Nhờ các anh chị giúp em viết code VBA để lấy dữ liệu từ nhiều file report, mỗi file thường có nhiều sheet (nhiều nhất là 4 sheet).
Em muốn : tạo 1 button, khi nhấn vào, nó sẽ hiện ra bảng cho mình chọn đường dẫn đến các file report, sau khi mình chọn thì nó sẽ lần lượt mở file report 1, copy sheet1, rồi đến sheet 2... cho đến hết, tiếp tục lần lượt cho các file còn lại rồi dán tất cả vào file tổng hợp.
cách dán :
Cột A của file tổng hợp = cột A của các file report
Cột B của file tổng hợp = cột F của các file report
Cột C của file tổng hợp = cột G của các file report
Cột D của file tổng hợp = cột I của các file report
................
Chú ý : Các file report xuất từ phần mềm ra nên cột F (agent code) , thường có dạng 0030423 (có số 0 đầu) , sau khi paste vào cột B của file tổng hợp thì vui lòng sửa lại định dạng là text (để sau này dùng cho hàm Vlookup)
2 cột AJ và AL thì định dạng là dd/mm/yyyy.
lượng dữ liệu trong các file report sau khi import có thể lên đến hơn 300.000 dòng, mình chỉ đưa dữ liệu mẫu vài dòng thôi vì nếu đưa đúng file gốc thì dung lượng quá lớn.
Cảm ơn các anh chị.
Em muốn : tạo 1 button, khi nhấn vào, nó sẽ hiện ra bảng cho mình chọn đường dẫn đến các file report, sau khi mình chọn thì nó sẽ lần lượt mở file report 1, copy sheet1, rồi đến sheet 2... cho đến hết, tiếp tục lần lượt cho các file còn lại rồi dán tất cả vào file tổng hợp.
cách dán :
Cột A của file tổng hợp = cột A của các file report
Cột B của file tổng hợp = cột F của các file report
Cột C của file tổng hợp = cột G của các file report
Cột D của file tổng hợp = cột I của các file report
................
Chú ý : Các file report xuất từ phần mềm ra nên cột F (agent code) , thường có dạng 0030423 (có số 0 đầu) , sau khi paste vào cột B của file tổng hợp thì vui lòng sửa lại định dạng là text (để sau này dùng cho hàm Vlookup)
2 cột AJ và AL thì định dạng là dd/mm/yyyy.
lượng dữ liệu trong các file report sau khi import có thể lên đến hơn 300.000 dòng, mình chỉ đưa dữ liệu mẫu vài dòng thôi vì nếu đưa đúng file gốc thì dung lượng quá lớn.
Cảm ơn các anh chị.
File đính kèm
Lần chỉnh sửa cuối: