Xin giúp em Copy tất cả các sheet của nhiều file vào 1 file ạ

[Taiclub]

Nhờ các anh chị viết code giúp em. Em có các file Trong file có nhiều sheet. Em có File tổng hợp. Khi em vào file tổng hợp bấm vào biểu tượng Tổng hợp thì sẽ mở thư mục lên và chọn các file. Khi chọn xong thì tất cả các sheet của các file sẽ được tổng hợp tất cả vào file tổng hợp ạ.Em cảm ơn các anh chị.

 

[Thóc Sama]

Bạn tìm hểu power query xem, nếu dùng code thì chịu khó tìm kiếm trên này, dạng code này GPE rất nhiều!

 

[snow25]

Nhờ các anh chị viết code giúp em. Em có các file Trong file có nhiều sheet. Em có File tổng hợp. Khi em vào file tổng hợp bấm vào biểu tượng Tổng hợp thì sẽ mở thư mục lên và chọn các file. Khi chọn xong thì tất cả các sheet của các file sẽ được tổng hợp tất cả vào file tổng hợp ạ.Em cảm ơn các anh chị.

Có nhiều tên trùng nhau vẫn copy hết à bạn.Có trường hợp nào dữ liệu ở các sheets bị trống không.

 

[Maika8008]

Nhờ các anh chị viết code giúp em. Em có các file Trong file có nhiều sheet. Em có File tổng hợp. Khi em vào file tổng hợp bấm vào biểu tượng Tổng hợp thì sẽ mở thư mục lên và chọn các file. Khi chọn xong thì tất cả các sheet của các file sẽ được tổng hợp tất cả vào file tổng hợp ạ.Em cảm ơn các anh chị.

Chưa hiểu chữ TỔNG HỢP kia lắm: là chép y nguyên sheet qua hay tổng hợp theo 1 tiêu chí nào đó?

 

[VetMini]

Chưa hiểu chữ TỔNG HỢP kia lắm: là chép y nguyên sheet qua hay tổng hợp theo 1 tiêu chí nào đó?

Xuân này GPE bị khủng hoảng đói bài trầm trọng.
Cứ có manh mói nhỏ nào thì code thẳng thừng. Không đúng ý thì thớt sẽ bảo cho làm lại.
Chấn chờ mất mối.

 

[Taiclub]

Có nhiều tên trùng nhau vẫn copy hết à bạn.Có trường hợp nào dữ liệu ở các sheets bị trống không.

Dạ chỉ cần copy hết sheet của các file vào file tổng hợp thôi ạ.

Bài đã được tự động gộp: 30/1/23

Chưa hiểu chữ TỔNG HỢP kia lắm: là chép y nguyên sheet qua hay tổng hợp theo 1 tiêu chí nào đó?

Dạ chỉ cần copy hết các sheet trong các file kia thôi ạ.

 

[Maika8008]

Xuân này GPE bị khủng hoảng đói bài trầm trọng.
Cứ có manh mói nhỏ nào thì code thẳng thừng. Không đúng ý thì thớt sẽ bảo cho làm lại.
Chấn chờ mất mối.

Đói đâu bác. Lâu nay máy hư mãi và cũng lu bu nhiều chuyện. Giờ em khởi động lại đấy. Mà khởi động thì phải nhẹ nhàng chút chứ bập vào làm ngay thì máy sẽ bị nóng quá mức.

 

[Maika8008]

Dạ chỉ cần copy hết các sheet trong các file kia thôi ạ.

Bạn chạy thử file xem!

 

[Taiclub]

Bạn chạy thử file xem!

Dạ em cảm ơn ạ. Nhanh quá ạ. Em cảm ơn.

 

[Taiclub]

Bạn chạy thử file xem!

Dạ cho em hỏi thêm là mỗi lần chạy xong có cách nào vẫn ở sheet tổng hợp không ạ. Em chạy file xong nó ở sheet khác. Phải quay lại sheet tổng hợp ạ.Em cảm ơn anh chị.

 

[Maika8008]

Dạ cho em hỏi thêm là mỗi lần chạy xong có cách nào vẫn ở sheet tổng hợp không ạ. Em chạy file xong nó ở sheet khác. Phải quay lại sheet tổng hợp ạ.Em cảm ơn anh chị.

Bạn thêm câu lệnh Sheets("Tonghop").Activate ở cuối