Giúp viết code VBA copy file và đổi tên file từ thư mục này qua thư mục khác (1 người xem)

[MrExcel]

Xin chào anh chị forum, nhờ anh chị giúp em viết code VBA thực hiện yêu cầu sau:
-EM có 1 thư mục, tạm gọi là "C:\REPORT" gồm các file dạng "Q2409086Mbp11_20140915105927.xls", "Q2409087Nbp11_20140915141656.xls"..., những file này đc hệ thống xuất ra tự động sau khoảng mỗi 5h.
-Giờ em muốn viết đoạn code copy những file này vào thư mục "D:\BACKUP" và đổi tên thành dạng "Q2409086Mbp11.xls", "Q2409087Nbp11.xls"... (tức là chỉ giữ lại phần đầu).
-Nếu đến đây thì không có gì khó khăn nhưng do những file này đc tạo ra tự động (tức là những file trong "C:\REPORT" tiếp theo sẽ là "Q2409088Mbp11_20140915156746.xls", "Q2409089Nbp11_20140915164534.xls"... Và nếu em tiếp tục chạy code thì làm sao để nó không copy và đổi tên trùng lặp với lần trước. Tức là lần đầu chạy thì copy những file "Q2409086Mbp11_20140915105927.xls", "Q2409087Nbp11_20140915141656.xls" và đổi tên thành "Q2409086Mbp11.xls", "Q2409087Nbp11.xls". Sau đó khoảng 5h, nếu chạy code thì nó sẽ tiếp tục copy và đổi tên các file tiếp theo "Q2409088Mbp11_20140915156746.xls", "Q2409089Nbp11_20140915164534.xls"... thành "Q2409088Mbp11.xls", "Q2409089Nbp11.xls"....
Mong anh chị giúp đỡ!
Thanks all!

 

[MrExcel]

Ý tưởng là, đầu tiên, tìm cái tên file mới nhất trong thư mục "D:\BACKUP" (cái này em viết code đc rùi), sau đó dùng vòng lặp copy toàn bộ file trong "C:\REPORT" cho đến khi có 1 file trong "C:\REPORT" trùng với file mới nhất trong "D:\BACKUP" thì dừng lại. Giờ chỉ cần cái code liệt kê số thứ tự của 1 file bất kỳ trong thư mục là em có thể hoàn thành bài tập này rùi.

 

[ngoc.]

"Giờ chỉ cần cái code liệt kê số thứ tự của 1 file bất kỳ trong thư mục là em có thể hoàn thành bài tập này rùi." cai ban can. hien minh dang co. Neu con quan tam, mail cho minh: kngocqn@gmail.com