Nối nhiều file excel thành một file excel thành 1 file, cách gộp nhiều file excel vào một file duy nhất

Hướng dẫn này chỉ ra rằng 3 bước sẽ giúp bạn ghép hoặc gộp các file excel thành một file duy nhất, thực hiện một đoạn code VBA ngắn ngọn và công cụ xào luộc Worksheet tất cả sẵn trong Excel.

Bạn đang xem: Nối nhiều file excel thành một file

Việc xử lý dữ liệu trong một tệp tin excel duy nhất dễ dàng hơn tương đối nhiều thay vì đề xuất liên tục biến đổi giữa những file, đồng thời giảm bớt thời gian cũng như tránh cơ mà sai sót dữ liệu không hy vọng muốn. Bạn có thể ứng dụng ghép file để thống kê kết quả này công việc, quyết toán thu, bỏ ra của phòng ban mình vào một khoảng thời gian bất kỳ. Mặc dù nhiên, câu hỏi ghép nhiều file excel thành một file hoàn toàn có thể khiến bạn mất quá nhiều thời gian nếu khách hàng không cầm được kỹ thuật.

Bây giờ, Blog share năng lực sẽ phía dẫn bạn 3 bước để thực hiện việc này một cách đơn giản và dễ dàng và hiệu quả. Cùng mày mò cách làm ngay nhé!

Bài viết này còn có gì?

Cách ghép các file excel thành một tệp tin duy nhất

Bước 2: thực hiện Trình biên soạn code VBA để thao tác

Tiếp theo, khi hành lang cửa số Microsoft Visual Basic for Applications hiện ra. Các bạn chọn thẻInserttrên thanh công cụ. Thanh cuộn hiển thị thì chúng ta chọn mụcModule.

Sub copy()Path = "K:My DriveWorkingSHAREKYNANGContent"Filename = Dir(Path và "*.xls*")Do While Filename ""Workbooks.Open Filename:=Path & Filename, Read
Only:=True
For Each Sheet In Active
Workbook.Sheets
Sheet.copy after:=This
Workbook.Sheets(1)Next
Workbooks(Filename).Close
Filename = Dir()Loop
End Sub
Sau đó chúng ta nhấnRuntrên thanh chính sách hoặc dấn phímF5để chạy mã code.

Lưu ý là đoạn Path = “ ” : bên trong dấu ngoặc là băng thông của thư mục chứa các file các bạn lưu. Cùng nhớ thêm dấu gạch “” sau cùng đường dẫn nhằm nó gọi là 1 folder nhé.

Chỉ đề nghị như vậy là tất cả file Excel vào thư mụcContentđã được gộp lại thành một tệp tin Excel duy nhất. Bây chừ thì chúng ta cần thực hiện chỉnh sửa tài liệu trong tệp tin Excel mới cũng giống như nhấnSaveđể giữ giàng file này.

Tổng kết:

Rất dễ dàng và đơn giản đúng không bạn? Với phương pháp sử dụng code VBA để gộp các file Excel thành một file tuyệt nhất này, của cả bạn xa lạ với việc thực hiện code VBA cũng rất có thể thực hiện tại một cách dễ dàng và đơn giản và công dụng được . Hy vọng nội dung bài viết sẽ bổ ích với chúng ta trong quy trình làm việc.

Chắc hẳn người tiêu dùng Excel rất nhiều lần loay hoay trù trừ làm thể nào để tổng hợp những file Excel riêng biệt lẻ khác biệt thành một file hoàn hảo gồm các trang tính. Việc thao tác dùng các hàm như VLOOKUP giỏi tham chiếu tới những bảng tính Excel khác trong khi gây nhiều phiền toái khi người dùng phải mở nhiều file đồng thời. Bài viết này, cdsptphcm.edu.vn sẽ hướng dẫn các bạn cách gộp những file Excel thành một tệp tin duy nhất.

Tuyệt đỉnh Excel - khóa đào tạo và huấn luyện Excel Online giúp bạn Trở thành bậc thầy Excel trong 16 giờ

XEM cấp tốc MỤC LỤC

Sử dụng CODE VBA
Đầu tiên, hãy cho tất cả các file yêu cầu tổng hợp vào vào một thư mục như sau:
Tiếp theo,
Mở tệp Excel mới mà bạn có nhu cầu tổng hợp cả 4 tệp tin trên
Các tệp tin book1, book2, book3, book4 bao gồm nhiều sheets không giống nhau.
Bạn yêu cầu thực hiện thao tác sau đây:
Vào Developer > Visual Basic, hành lang cửa số Microsoft Visual Basic for applications mở ra. Nhấp vào Insert > Module, coppy đoạn mã sau đây vào Module:
Sub Get
Sheets()Path = "C:UsersdtDesktopdt kte" Filename = Dir(Path & "*.xls") bởi While Filename "" Workbooks.Open Filename:=Path và Filename, Read
Only:=True For Each Sheet In Active
Workbook.Sheets Sheet.Copy After:=This
Workbook.Sheets(1) Next Sheet Workbooks(Filename).Close Filename = Dir() Loop
End SubLưu ý: trong khúc Code trên, sau phần " Path = ", trong dấu ngoặc kép (") là thư mục đựng 4 tệp tin excel vào ví dụ công ty chúng tôi đã cho, chúng ta cũng có thể thay thay đổi bằng đường dẫn thư mục chứa những file ai đang lưu. Đừng quên thêm dấu "" sau băng thông để Excel có thể nhận định chúng trên và một folder.
Xem thêm: Top 12+ xin xăm cửu huyền thất tổ, xin xăm cửu huyền thất tổ
Cuối cùng, thừa nhận Run hoặc phím F5 để chạy mã. Công dụng thu được là tất cả trang tính giờ đây sẽ ở trên cùng một file (một bảng tính) Excel.
Nhược điểm của mã Code này là gộp toàn bộ các file chúng ta chọn trong thư mục thành một bảng tính duy nhất, nếu như bạn chỉ mong muốn gộp một vài ba sheet ví dụ trong các file Excel sẵn có, thì cách thứ 2 sau đây mới dành riêng cho bạn.
Sử dụng mã CODE VBA khác
Thao tác tương tự như trên, bạn chỉ cần thay "mã Code trên" bởi mã Code mới sau:
Sub Merge
Excel
Files() Dim fname
List, fname
Cur
File As Variant Dim count
Files, count
Sheets As Integer Dim wks
Cur
Sheet As Worksheet Dim wbk
Cur
Book, wbk
Src
Book As Workbook fname
List = Application.Get
Open
Filename(File
Filter:="Microsoft Excel Workbooks (*.xls;*.xlsx;*.xlsm),*.xls;*.xlsx;*.xlsm", Title:="Choose Excel files lớn merge", Multi
Select:=True) If (vb
Boolean Var
Type(fname
List)) Then If (UBound(fname
List) > 0) Then count
Files = 0 count
Sheets = 0 Application.Screen
Updating = False Application.Calculation = xl
Calculation
Manual set wbk
Cur
Book = Active
Workbook For Each fname
Cur
File In fname
List count
Files = count
Files + 1 mix wbk
Src
Book = Workbooks.Open(Filename:=fname
Cur
File) For Each wks
Cur
Sheet In wbk
Src
Book.Sheets count
Sheets = count
Sheets + 1 wks
Cur
Sheet.Copy after:=wbk
Cur
Book.Sheets(wbk
Cur
Book.Sheets.Count) Next wbk
Src
Book.Close Save
Changes:=False Next Application.Screen
Updating = True Application.Calculation = xl
Calculation
Automatic Msg
Box "Processed " và count
Files và " files" và vb
Cr
Lf và "Merged " và count
Sheets & " worksheets", Title:="Merge Excel files" over If Else Msg
Box "No files selected", Title:="Merge Excel files" over If end Sub
Sử dụng "Move or Copy"
Với các dân không chuyên trong Excel hay không sử dụng được Code phức tạp, thì bạn cần phải sử dụng khả năng More or Copy để coppy các trang tính một bí quyết nhanh hơn.
Bước 1: Mở toàn bộ các file chứa những sheets bạn muốn gộp.
Bước 2: Chọn tất cả các tên trang tính (ví dụ như Sheet 1, Sheet 2,...) vào bảng tính nghỉ ngơi thanh tên. Chúng ta có thể chọn nhiều trang bằng phương pháp nhấn duy trì Ctrl hoặc Shift rồi bấm chuột trái để chọn. Bấm vào phải vào thương hiệu một trang tính trong những trang tính vẫn chọn, lựa chọn Move or Copy như hình bên dưới đây
Hộp thoại Move or Copy sẽ được hiện lên, tại loại "Move selected sheets lớn book" các bạn chọn toàn bộ các tệp tin Excel trơ khấc (các bảng tính) mà bạn có nhu cầu gộp nhất. Tại phần "Before sheet" các bạn chọn vị trí các sheet như hình bên dưới đây:
Cuối cùng, Click OK và hiệu quả thu được là 1 bảng tính Excel lớn bao hàm các trang tính bạn đã chọn.
Lưu ý: Lặp lại làm việc với các bảng tính (file Excel trơ tráo khác) như book2.xlsx, book3.xlsx,... Của chúng tôi hay các bảng tính của chúng ta để gộp được thành một tệp tin Excel béo duy nhất.
Qua bài viết trên, bọn họ thấy VBA là 1 trong công rứa hữu hiệu đối với người cần áp dụng Excel trong các bước hàng ngày. Không phần đông thế, VBA còn đựng vô vàn tính năng cung cấp bạn không chỉ có trong Excel mà hơn nữa trong Word, Power
Point, Outlook,... Giúp đỡ bạn trở thành dân chuyên trong nghành nghề dịch vụ tin học tập văn phòng.
Tham khảo các nội dung bài viết về VBA cũng tương tự tham gia khóa học của cdsptphcm.edu.vn để thống trị các kỹ năng trong Excel tối ưu hóa các bước của bạn.