Cut file ảnh sang folder khác

[bigbabol89]

Em chào các anh chị,
Như tiêu đề, em đang gặp khó khăn trong việc chuyển file ảnh sang folder khác theo điều kiện.
Em có : 1 list danh sách excel các file và các file ảnh khác nhau ( nằm trong cùng 1 folder ) ==> Cắt những file không tồn tại ở file excel nhưng tồn tại ở folder
- Folder ảnh : 1,2,3,4,5,6
- List excel : 1,3,5
==> Em muốn cắt file 2,4,6 sang folder khác
Em cám ơn ạ !

 

[đungtb2]

Em chào các anh chị,
Như tiêu đề, em đang gặp khó khăn trong việc chuyển file ảnh sang folder khác theo điều kiện.
Em có : 1 list danh sách excel các file và các file ảnh khác nhau ( nằm trong cùng 1 folder ) ==> Cắt những file không tồn tại ở file excel nhưng tồn tại ở folder
- Folder ảnh : 1,2,3,4,5,6
- List excel : 1,3,5
==> Em muốn cắt file 2,4,6 sang folder khác
Em cám ơn ạ !

Bạn xem file dưới nhé. Các ảnh mình cho vào 1 folder riêng, file excel chạy để phía ngoài. Khi chạy code thì các ảnh bị cắt sẽ được cho vào 1 folder mới tạo ra tên là "ket qua".

 

[HeSanbi]

Tham khảo file trong bài viết

https://www.giaiphapexcel.com/diendan/threads/lấy-danh-sách-đường-dẫn-file-và-thư-mục-trong-vba.145043/

 

[bigbabol89]

Bạn xem file dưới nhé. Các ảnh mình cho vào 1 folder riêng, file excel chạy để phía ngoài. Khi chạy code thì các ảnh bị cắt sẽ được cho vào 1 folder mới tạo ra tên là "ket qua".

Mình cám ơn nhé. File chạy rất tốt ạ

 

[bigbabol89]

Bạn xem file dưới nhé. Các ảnh mình cho vào 1 folder riêng, file excel chạy để phía ngoài. Khi chạy code thì các ảnh bị cắt sẽ được cho vào 1 folder mới tạo ra tên là "ket qua".

Bạn ơi, nếu được bạn có thể giúp mình thêm là, sau khi cut ảnh thì thống kê 1 số thông tin ra workbook mới :
- Cột A ( ở workbook mới ) : Các ID có ở file excel nhưng không có ở folder Anh.
- Cột B ( ở workbook mới ) : Các ảnh đã được chuyển từ folder Anh -> ket qua.
Cám ơn bạn

 

[đungtb2]

Bạn ơi, nếu được bạn có thể giúp mình thêm là, sau khi cut ảnh thì thống kê 1 số thông tin ra workbook mới :
- Cột A ( ở workbook mới ) : Các ID có ở file excel nhưng không có ở folder Anh.
- Cột B ( ở workbook mới ) : Các ảnh đã được chuyển từ folder Anh -> ket qua.
Cám ơn bạn

Bạn kiểm tra file dưới nhé.

 

[bigbabol89]

Bạn kiểm tra file dưới nhé.

Cám ơn bạn rất rất nhiều