Nối nhiều file excel thành 1 file excel (1 người xem)

[toikhongvao]

Mô tả công việc tự động là thế này.
Chuẩn bị: Đưa tất cả cá file excel vào cùng 1 folder, tên file theo thứ tự 1,2,3,.... các File excel có cùng cấu trúc, cùng số cột, số dòng khác nhau.
Chạy macro:
Tạo một file excel mới tên tonghop. nằm cùng folder với các file trên và lấy dữ liệu từ các file trong folder nối lại với nhau.
Xong
Xin giúp mình, THX

 

[haisonxdtl]

Chà bài viết hay thiệt.
Em cũng trục trẹt về vấn đề tổng hợp dữ liệu đây, mong rằng nghiaphuc giúp em vụ này.

Em có rất nhiều file Excel xuất ra từ phần mềm HR mỗi file có 03 sheet với tên Sheet1, Sheet2, Sheet3 chỉ có Sheet1 là có dữ liệu thôi.
Mục đích là copy nội dung Sheet1 của tất cả các file rồi dán vào file tổng hợp với tên của Sheet là tên của các file tương ứng.

Cảm ơn trước.

Đây cũng là vấn đề tôi rất quan tâm. Mong các lão làng nhiều kinh nghiệm chỉ giúp.
Tôi có nhiều file Excel có cấu trúc file giống nhau, ngay cả số lượng và tên của từng sheet trong file (chỉ khác nhau số dòng dữ liệu).
Tôi tạo 01 file mới có tên bất kỳ. Sau đó copy nội dung của 01 sheet trong từng file rồi lần lượt paste cộng dồn vào 01 sheet của file Excel mới tạo cho đến hết.
Việc này lặp đi lặp lại mất khá nhiều thời gian và công sức.
Mong mọi người có quan tâm và đã gặp trường hợp như tôi xin giúp đỡ. Xin cám ơn rất nhiều.
Vd : Tôi cần Copy nội dung trong Sheet TH Vat tu (In)
File đính kèm : http://www.mediafire.com/?867zxpbfo8kc99k
Email : haisonxdtl@yahoo.com

 

[mxv119]

Các bước thực hiện:

_ Xuất các tập tin cần lấy dữ liệu vào một thư mục.
_ Mở tập tin CombineFiles.xls
_ Thực hiện thủ tục: MergeFiles
Vậy là xong.

Xem tập tin đính kèm tôi đã làm cho bạn rồi.

Lê Văn Duyệt

Ps: Hôm nào lên Bắc Giang chơi mới được.

Sao em tải về, trong file nén ko có ji cả????

 

[bun_bo_hue]

Sao em tải về, trong file nén ko có ji cả????

Bác DUYỆT up nhầm file rồi. File trống không.

 

[pjsoga]

Em sử dụng Excel 2007, hình như không có "Application.FileSearch". Bác có thể chuyển code về 2007 giúp em đc không?. Thanh bác!