Để chuyển file CSV sang định dạng Excel có nhiều cách thực hiện khác nhau. Nếu bạn muốn chuyển đổi hàng loạt file CSV sang Excel thì có thể tham khảo bài viết dưới đây của Hocviendaotao.com. Chỉ với vài thao tác đơn giản, chúng ta đã có ngay các file XLS hoặc XLSX Excel dễ dàng, mà không cần nhờ phần mềm hỗ trợ.
1. Chuyển file CSV sang file XLS hàng loạt
Bước 1:Trước hết chúng ta sẽ nhóm các file CSV cần chuyển đổi sang định dạng XLS vào cùng 1 thư mục như hình dưới đây.
Tiếp đến người dùng mở Excel rồi nhấn vào tab Developer rồi nhấn tiếp vào Visual Basic.
Chuyển sang giao diện mới người dùng nhấn vào Insert rồi chọn Module để mở giao diện nhập mã code VBA trong Excel.
Sub CSVtoXLS() 'UpdatebyExtendoffice20170814 Dim xFd As FileDialog Dim xSPath As String Dim xCSVFile As String Dim xWsheet As String Application.DisplayAlerts = False Application.StatusBar = True xWsheet = ActiveWorkbook.Name Set xFd = Application.FileDialog(msoFileDialogFolderPicker) xFd.Title = "Select a folder:" If xFd.Show = -1 Then xSPath = xFd.SelectedItems(1) Else Exit Sub End If If Right(xSPath, 1) <> "\" Then xSPath = xSPath + "\" xCSVFile = Dir(xSPath & "*.csv") Do While xCSVFile <> "" Application.StatusBar = "Converting: " & xCSVFile Workbooks.Open Filename:=xSPath & xCSVFile ActiveWorkbook.SaveAs Replace(xSPath & xCSVFile, ".csv", ".xls", vbTextCompare), xlNormal ActiveWorkbook.Close Windows(xWsheet).Activate xCSVFile = Dir Loop Application.StatusBar = False Application.DisplayAlerts = True End Sub
Cuối cùng nhấn vào biểu tượng Run ở thanh công cụ bên trên như hình dưới đây để chạy code VBA.
Kết quả chúng ta sẽ nhìn thấy các file XLS như hình dưới đây.
2. Chuyển file CSV sang file XLSX hàng loạt
Ngoài chuyển đổi CSV sang XLS như trên chúng ta cũng có thể chuyển file CSV sang XLSX dễ dàng. Trước hết bạn cũng mở trình soạn code VBA trên Excel rồi nhập đoạn mã code như dưới đây.Sub CSVTOXLSX() 'UpdatebyExtendoffice20170814 Dim xFd As FileDialog Dim xSPath As String Dim xCSVFile As String Dim xWsheet As String Application.DisplayAlerts = False Application.StatusBar = True xWsheet = ActiveWorkbook.Name Set xFd = Application.FileDialog(msoFileDialogFolderPicker) xFd.Title = "Select a folder:" If xFd.Show = -1 Then xSPath = xFd.SelectedItems(1) Else Exit Sub End If If Right(xSPath, 1) <> "\" Then xSPath = xSPath + "\" xCSVFile = Dir(xSPath & "*.csv") Do While xCSVFile <> "" Application.StatusBar = "Converting: " & xCSVFile Workbooks.Open Filename:=xSPath & xCSVFile ActiveWorkbook.SaveAs Replace(xSPath & xCSVFile, ".csv", ".XLXS", vbTextCompare), xlWorkbookDefault ActiveWorkbook.Close Windows(xWsheet).Activate xCSVFile = Dir Loop Application.StatusBar = False Application.DisplayAlerts = True End Sub
3. Chuyển file CSV sang Excel online
Các công cụ chuyển đổi trực tuyến hiện nay cũng đã hỗ trợ chuyển nhiều file cùng lúc, thuận tiện cho người dùng khi làm việc. Có rất nhiều công cụ chuyển đổi định dạng file như Onlineconvertfree chẳng hạn.Chúng ta truy cập vào link dưới đây để mở ngay phần chuyển đổi CSV sang XLS. Nếu muốn đổi sang XLXS thì bạn chỉ cần thay đổi lại mục chuyển đổi định dạng là được. Sau đó nhấn Choose File để tải các file CSV lên.
https://onlineconvertfree.com/convert-format/csv-to-xls/
Chúc các bạn thực hiện thành công!
Khóa đào tạo Power BI phân tích báo cáo để bán hàng thành công
KHÓA HỌC LẬP TRÌNH PYTHON TỪ CƠ BẢN ĐẾN CHUYÊN NGHIỆP
Khóa học Lập trình Visual Foxpro 9 - Dành cho nhà quản lý và kế toán
Khóa học hướng dẫn về Moodle chuyên nghiệp và hay
Xây dựng hệ thống đào tạo trực tuyến chuyên nghiệp tốt nhất hiện nay.
Khóa học AutoIt dành cho dân IT và Marketing chuyên nghiệp
Khoá học Word từ cơ bản tới nâng cao, học nhanh, hiểu sâu
Khóa học hướng dẫn sử dụng Powerpoint từ đơn giản đến phức tạp HIỆU QUẢ
Khóa học Thiết kế, quản lý dữ liệu dự án chuyên nghiệp cho doanh nghiệp bằng Bizagi
Khóa học Phân tích dữ liệu sử dụng Power Query trong Excel
Khóa học "Thiết kế bài giảng điện tử", Video, hoạt hình
kiếm tiền Youtube bằng phần mềm Camtasia Studio
Khóa học HƯỚNG DẪN THIẾT KẾ VIDEO CLIP CHO DÂN MARKETING CHUYÊN NGHIỆP
HƯỚNG DẪN THIẾT KẾ QUẢNG CÁO VÀ ĐỒ HỌA CHUYÊN NGHIỆP VỚI CANVA
Hãy tham gia khóa học để trở thành người chuyên nghiệp. Tuyệt HAY!😲👍
GOOGLE SPREADSHEETS phê không tưởng
Khóa học sử dụng Adobe Presenter-Tạo bài giảng điện tử
Khóa học sử dụng Edmodo để dạy và học hiện đại để thành công
Cập nhật công nghệ từ Youtube tại link: congnghe.hocviendaotao.com
Tham gia nhóm Facebook
Để tham gia khóa học công nghệ truy cập link: http://thuvien.hocviendaotao.com
Mọi hỗ trợ về công nghệ email: dinhanhtuan68@gmail.com