Khi làm việc với các tệp Excel, đôi khi chúng tôi tạo ra nhiều tệp CSV. Giờ đây, chúng tôi thường xuyên phải hợp nhất các tệp CSV đó vào một sổ làm việc. Trong bài viết này, tôi sẽ chỉ cho bạn tất cả các bước để hợp nhất tệp CSV thành nhiều trang tính trong Excel.
Bạn có thể tải xuống miễn phí các tệp CSV nguồn và sổ làm việc được hợp nhất cuối cùng của chúng tôi từ đây!
Tệp nguồn CSV:
Tệp được hợp nhất cuối cùng:
Các bước để hợp nhất tệp CSV thành nhiều trang tính Excel
Giả sử, bạn có ba sổ bài tập Excel riêng cho các phiếu điểm lớp 6, lớp 7 và lớp 8 cho các môn học khác nhau cho nhiều học sinh. Các tệp ở định dạng CSV với tên, môn học và điểm số của học sinh. Bây giờ, bạn muốn hợp nhất tất cả các sổ làm việc trong một sổ làm việc trong nhiều trang tính. Xem qua hướng dẫn từng bước để hợp nhất tệp CSV thành nhiều trang tính Excel.
📌 Bước 1:Chuẩn bị Mô-đun cho VBA
Trước hết, bạn cần chèn và chuẩn bị một mô-đun cho ứng dụng mã VBA được yêu cầu.
- Để thực hiện việc này, hãy chuyển đến Nhà phát triển tab>> Visual Basic công cụ.
- Do đó, Trình soạn thảo VB cửa sổ sẽ mở ra.
- Sau đó, đi tới Chèn ở đây và chọn Mô-đun tùy chọn.
Kết quả là bây giờ bạn sẽ có một mô-đun để chèn mã VBA của mình.
Đọc thêm: Excel VBA để đọc tệp CSV thành mảng (4 ví dụ lý tưởng)
📌 Bước 2:Viết và lưu mã VBA
Sau đây, bạn sẽ cần phải chèn mã VBA của mình ngay bây giờ.
- Để thực hiện việc này, trước tiên hãy nhấp vào Mô-đun 1 .
- Sau đó, hãy viết mã sau trong Trình soạn thảo VB của Mô-đun 1 .
Sub MergeCSVFiles()
Dim openFiles As Variant
Dim I As Integer
Dim wb As Workbook
Dim mergedWb As Workbook
Dim delimiter As String
Dim screen As Boolean
On Error GoTo ErrHandler
screen = Application.ScreenUpdating
Application.ScreenUpdating = False
delimiter = ";"
openFiles = Application.GetOpenFilename("CSV Files (*.csv), *.csv", , "Merge CSV Files", , True)
If TypeName(openFiles) = "Boolean" Then
MsgBox "No files were selected", , "Merge CSV Files"
GoTo ExitHandler
End If
I = 1
Set mergedWb = Workbooks.Open(openFiles(I))
mergedWb.Sheets(1).Copy
Set wb = Application.ActiveWorkbook
mergedWb.Close False
Do While I < UBound(openFiles)
I = I + 1
Set mergedWb = Workbooks.Open(openFiles(I))
mergedWb.Sheets(1).Move , wb.Sheets(wb.Sheets.Count)
Loop
ExitHandler:
Application.ScreenUpdating = screen
Set wb = Nothing
Set mergedWb = Nothing
Exit Sub
ErrHandler:
MsgBox Err.Description, , "Merge CSV Files"
Resume ExitHandler
End Sub
- Sau đó, nhấn Ctrl + S trên bàn phím của bạn để lưu mã VBA.
- Do đó, Microsoft Excel hộp thoại sẽ xuất hiện.
- Sau đó, nhấp vào nút Không nút.
- Do đó, nút Lưu dưới dạng cửa sổ sẽ xuất hiện.
- Sau đây, thay đổi Lưu dưới dạng: tùy chọn dưới dạng .xlsm định dạng và nhấp vào nút Lưu nút.
Do đó, mã VBA của bạn được viết và lưu một cách hoàn hảo.
Đọc thêm: Excel VBA để đọc từng dòng tệp CSV (3 ví dụ lý tưởng)
Bài đọc tương tự
- Cách nhập tệp văn bản sang Excel bằng VBA (3 cách dễ dàng)
- Cách Mở Notepad hoặc Tệp Văn bản trong Excel bằng Cột (3 Phương pháp Dễ dàng)
- Excel VBA:Đọc tệp văn bản thành chuỗi (4 trường hợp hiệu quả)
- Cách chuyển đổi CSV sang XLSX (4 Phương pháp Nhanh)
- Cách đọc tệp CSV trong Excel (4 cách nhanh nhất)
📌 Bước 3:Chạy mã để hợp nhất tệp CSV thành nhiều trang tính
Cuối cùng nhưng không kém phần quan trọng, bạn cần chạy mã VBA ngay bây giờ để hợp nhất các tệp CSV thành nhiều trang tính.
- Để thực hiện việc này, hãy chuyển đến Nhà phát triển tab>> Macro công cụ.
- Do đó, Macro cửa sổ sẽ xuất hiện.
- Sau đó, chọn MergeCSVFiles macro từ Tên macro: và nhấp vào nút Chạy nút.
- Do đó, tất cả các sổ làm việc sẽ được hợp nhất thành một sổ làm việc mới dưới dạng các trang tính khác nhau.
- Bây giờ, để lưu trữ tệp Excel đúng cách, hãy chuyển đến Tệp tab.
- Sau đây, nhấp vào nút Lưu dưới dạng từ Tệp được mở rộng tab.
- Do đó, Excel Lưu dưới dạng hộp thoại sẽ xuất hiện.
- Sau đó, nhấp vào nút Duyệt qua tùy chọn.
- Do đó, nút Lưu dưới dạng hộp thoại sẽ xuất hiện.
- Sau đây, hãy chèn tên tệp mong muốn của bạn vào Tên tệp: hộp văn bản và nhấp vào nút Lưu nút.
Do đó, các tệp CSV được hợp nhất thành nhiều trang tính của một sổ làm việc. Và, kết quả cuối cùng sẽ như thế này.
Đọc thêm: Cách nhập CSV vào Trang tính Hiện có trong Excel (5 Phương pháp)
Sử dụng Power Query để hợp nhất các tệp CSV thành một trang tính trong Excel
Bây giờ, nếu bạn muốn hợp nhất các tệp CSV thành một trang tính trong Excel, bạn có thể sử dụng công cụ truy vấn nguồn Excel. Làm theo các bước bên dưới để thực hiện việc này.
📌 Các bước:
- Đầu tiên và quan trọng nhất, hãy chuyển đến Dữ liệu tab>> Nhận dữ liệu công cụ>> Từ tệp danh sách tùy chọn>> Từ thư mục tùy chọn.
- Kết quả là Duyệt qua cửa sổ sẽ mở ra.
- Sau đây, hãy chọn thư mục bạn đã lưu các tệp CSV.
- Sau đó, nhấp vào nút Mở nút.
- Do đó, cửa sổ Power Query sẽ mở ra và hiển thị cho bạn các tệp CSV để nhập.
- Sau đó, nhấp vào Kết hợp nút>> Kết hợp &chuyển đổi dữ liệu tùy chọn.
- Kết quả là Kết hợp các tệp cửa sổ sẽ xuất hiện.
- Bạn sẽ thấy bản xem trước tại đây và chọn Dấu phân cách tùy chọn dưới dạng Dấu chấm phẩy theo dữ liệu của bạn.
- Sau đây, nhấp vào nút OK nút.
- Do đó, bạn sẽ nhận được tệp đã hợp nhất trong cửa sổ Power Query.
- Cuối cùng nhưng không kém phần quan trọng, hãy chuyển đến Tệp từ cửa sổ Power Query>> nhấp vào nút Đóng &Tải nút>> Đóng và tải tùy chọn.
Do đó, bạn sẽ hợp nhất tất cả các tệp CSV thành một trang tính trong Excel. Và, đầu ra sẽ giống như thế này.
Đọc thêm: Cách mở CSV bằng Dấu phân cách trong Excel (6 cách đơn giản)
💬 Những điều cần nhớ
- Duy trì một dấu phân tách cụ thể cho mọi tệp và mọi dữ liệu.
- Tất cả các tệp CSV phải được định hướng theo cùng một cách và từ các hàng và cột giống nhau.
Kết luận
Như vậy, trong bài viết này, tôi đã hướng dẫn các bạn các bước để gộp tệp CSV thành nhiều trang tính trong Excel. Tôi đề nghị bạn đọc toàn bộ bài báo một cách cẩn thận và thực hành cho phù hợp. Tôi hy vọng bạn thấy bài viết này hữu ích và nhiều thông tin. Rất hoan nghênh bạn bình luận ở đây nếu bạn có thêm bất kỳ câu hỏi hoặc đề xuất nào.
Và, hãy truy cập ExcelDemy để tìm hiểu về nhiều giải pháp, mẹo và thủ thuật khác trong Excel. Xin cảm ơn!
Các bài viết có liên quan
- Cách Xem Tệp CSV trong Excel (3 Phương pháp Hiệu quả)
- Sự khác biệt giữa Tệp CSV và Excel (11 Ví dụ Thích hợp)
- Chuyển đổi CSV sang Excel Tự động với các Bước Dễ dàng
- [Đã giải quyết:] Excel đang mở tệp CSV trong một cột (3 giải pháp)
- Cách chuyển đổi CSV sang Dòng lệnh XLSX (với các bước dễ dàng)
- Excel VBA:Đọc từng dòng một tệp văn bản (6 ví dụ có liên quan)