Cách chuyển file CSV sang Excel hàng loạt

File CSV thường được sử dụng nhiều với dân kế toán do các cấu trúc hàm và lệnh đã thi hành trước kia được giữ lại. Hiện tại file CSV đã có thể mở trên Excel, hay mở file CSV trên Google Sheets dễ dàng. Tuy nhiên file CSV khi làm việc trên Excel cũng có thể có thể gặp một số lỗi như lỗi tiếng Việt khi mở file CSV trong Excel chẳng hạn. Vì vậy có nhiều người muốn chuyển đổi file CSV sang file Excel để làm việc thuận lợi hơn.

Để 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 mong muốn chuyển đổi đồng loạt file CSV sang Excel thì cũng đều có thể tham khảo bài viết dưới đây của Quản trị mạng. 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ờ ứng dụng hỗ trợ.

• Cách chuyển đổi file PDF sang Excel giữ nguyên định dạng
• Cách dễ dàng để chuyển đổi file XLSX sang XLS
• Cách chuyển file Excel sang Google Sheets
• Cách xóa định hình bảng trong Excel

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 với 1 thư mục như hình dưới đây.

Bước 2:

Tiếp đến người dùng mở Excel rồi bấm vào tab Developer rồi nhấn tiếp vào Visual Basic .

Bước 3:

Chuyển sang giao diện mới người sử dụng nhấn vào Insert rồi chọn Module để mở giao diện nhập mã code VBA trong Excel.

Sau đó chúng ta paste mã code dưới đây vào giao diện 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   

Bước 4:

Cuối cùng bấm vào biểu trưng Run ở thanh công cụ bên trên như hình dưới đây để chạy code VBA.

Lúc này hiển thị thư mục trên máy tính để chúng ta chọn folder chứa file CSV cần chuyển qua file Excel, nhấn OK. Ngay sau đó code VBA sẽ chạy và chuyển đổi file. Khi xong xuôi qui trình chuyển đổi bạn mở thư mục file CSV đã lưu trước đó.

Bước 5:

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 đều 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   

Sau đó bấm vào nút Run để chạy code VBA.

Khi xong xuôi qui trình chuyển đổi và mở thư mục chứa file CSV bạn sẽ nhìn thấy các file XLXS được chuyển đổi sang.

3. Chuyển file CSV sang Excel online

Các công cụ chuyển đổi trực tuyến hiện giờ cũng từng hỗ trợ chuyển nhiều file cùng lúc, thuận lợi cho người sử dụng khi làm việc. Có rất nhiều công cụ chuyển đổi định hình 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/   

Cuối cùng nhấn Convert để tiến hành chuyển đổi là xong.

Như vậy chúng ta đã có các cách chuyển đổi hàng loạt file CSV sang file Excel rồi. Nếu bạn không rành về mã code VBA trong Excel thì có thể dùng các công cụ chuyển đổi online cũng khá tiện ích.

Chúc các bạn thi hành thành công!

chuyển CSV thành XLS,cách chuyển CSV thành XLS,chuyển CSV sang XLSX,chuyển CSV sang Excel hàng loạt,chuyển csv sang excel code vba,cách chuyển csv sang excel online

Nội dung Cách chuyển file CSV sang Excel hàng loạt được tổng hợp sưu tầm biên tập bởi: Tin Học Trường Tín. Mọi ý kiến vui lòng gửi Liên Hệ cho truongtin.top để điều chỉnh. truongtin.top tks.