GỘP NHIỀU FILE EXCEL THÀNH 1 SHEET

Nếu bạn là một trong nhân viên kế toán, thủ quỹ hoặc liên tiếp phải làm công tác làm việc thống kê thì có lẽ rằng hay phải tổng hợp những báo cáo, list ...... Từ những phòng ban không giống thành 01 tệp tin tổng đúng không. Nếu thao tác 1 cách thủ công (copy - paste) thì hết sức mất thời gian. Hãy áp dụng thủ thuật sau đây để tạo file tổng một bí quyết nhanh chóng, thuận tiện nhé.

Bạn đang xem: Gộp nhiều file excel thành 1 sheet


*

*

*

Bước 1: các bạn tạo thêm 01 file đánh tên làDanh sách tổng, mở file đó ra, bấm tổ hợp phím Alt + F11 (đối với laptop là Fn + alternative text +F11). Lựa chọn tab Insert rồi chọn Module.
*

Sub GopFileExcel() Dim FilesToOpen Dim x As Integer On Error GoTo ErrHandler Application.ScreenUpdating = False FilesToOpen = Application.GetOpenFilename _ (FileFilter:="Microsoft Excel Files (*.xlsx), *.xlsx", MultiSelect:=True, Title:="Files khổng lồ Merge") If TypeName(FilesToOpen) = "Boolean" Then MsgBox "No Files were selected" GoTo ExitHandler kết thúc If x = 1 While x

*

Sub gopsheet() Dim J As Integer On Error Resume Next Sheets(1).Select Worksheets.Add Sheets(1).Name = "Combined" Sheets(2).Activate Range("A1").EntireRow.Select Selection.Copy Destination:=Sheets(1).Range("A1") For J = 2 to Sheets.Count Sheets(J).Activate Range("A1").Select Selection.CurrentRegion.Select Selection.Offset(1, 0).Resize(Selection.Rows.Count - 1).Select Selection.Copy Destination:=Sheets(1).Range("A65536").End(xlUp)(2) NextEnd Sub
Với bí quyết này bạn cũng có thể sao chép Sheet
từ tệp tin này thành 1 Sheet của file khác. Ví dụ như mình sẽ sao chép Sheet 1 của Danh sách 2 Vào file Danh sách 1.

Xem thêm: Download Canon Lbp2900B Driver And Software Downloads, Canon Lbp2900 Driver Windows 7/8/10

Bước 1: Mở Danh sách 2, nhấn vào phải vào Sheet 1 rồi chọn Move or copy. Nếu còn muốn chọn nhiều Sheet thì chúng ta giữ Ctrlhoặc Shift rồi nhấn vào trái để chọn.
Sau lúc gộp thì những file Excel sẽ thành các Sheet trong file Tổng. Bạn cũng có thể áp dụng code gộp sheet vào cách 2 đến hoàn thiện.Lời kết:
Thủ thuật này khá dễ dàng đúng không, hy vọng nội dung bài viết này hữu ích đối với các bạn.
Blogger Nguyễn Dương gồm một câu nói mà mình khôn xiết thích chính là "Thật sai lạc khi cho rằng một khi bong khỏi trường học, các bạn không cần học thêm điều new nữa". Chính vì thế mà hãy luôn luôn luôn học tập hỏi, con bạn chỉ dứt phát triển khi kết thúc học hỏi. Nếu như bạn chưa phát âm nội dung bài viết hoặc đang khúc mắc khi thao tác làm việc thì hãy comment phía dưới nội dung bài viết để mọi fan cùng trao đổi nhé!


Đây là Blog chia sẻ kiến thức công nghệ thông tin; những thủ thuật, tay nghề về sử dụng máy tính xách tay và các bài viết về công nghệ. Mình chắc hẳn rằng ở đây có rất nhiều thứ giỏi ho để chúng ta tham khảo đấy nhé