Tìm file PDF trong folder theo danh sách

[Dat Mai]

E có tình huống này cần mọi người giúp đỡ: E có 1 folder chứa file scan pdf của cả năm. Hàng tháng e nhận được 1 danh sách tên file pdf cần lấy ra để gửi cho KH. Bình thường danh sách ít thì e có thể search tên từng file rồi copy sang folder cần gửi. nhưng có tháng danh sách lên đến gần 500, có thể mất cả ngày nếu làm theo cách kia. Nên e rất mong nhận được sự giúp đỡ từ diễn đàn.
Em xin cảm ơn!

 

[befaint]

E có tình huống này cần mọi người giúp đỡ: E có 1 folder chứa file scan pdf của cả năm. Hàng tháng e nhận được 1 danh sách tên file pdf cần lấy ra để gửi cho KH. Bình thường danh sách ít thì e có thể search tên từng file rồi copy sang folder cần gửi. nhưng có tháng danh sách lên đến gần 500, có thể mất cả ngày nếu làm theo cách kia. Nên e rất mong nhận được sự giúp đỡ từ diễn đàn.
Em xin cảm ơn!

Tìm thì có tiêu chí, điều kiện để tìm?
Danh sách tên file thì tìm bài lấy danh sách tên file trong folder...

 

[quanluu]

E có tình huống này cần mọi người giúp đỡ: E có 1 folder chứa file scan pdf của cả năm. Hàng tháng e nhận được 1 danh sách tên file pdf cần lấy ra để gửi cho KH. Bình thường danh sách ít thì e có thể search tên từng file rồi copy sang folder cần gửi. nhưng có tháng danh sách lên đến gần 500, có thể mất cả ngày nếu làm theo cách kia. Nên e rất mong nhận được sự giúp đỡ từ diễn đàn.
Em xin cảm ơn!

Bạn tham khảo :

http://www.giaiphapexcel.com/diendan/threads/tổng-quan-về-filesystemobject.95898/


CopyFile (dùng để copy file(s) từ 1 thư mục đến thư mục khác)
Cái thú vị của lệnh này là nếu ta chỉ ra đường dẫn và tên file đích, thì code sẽ lấy tên file mà ta đã chỉ định.
Thông thường ta sẽ thực hiện code thế này để copy file

Dim fso As Object, FileToCopy As String, Des As String
Set fso = CreateObject("Scripting.FileSystemObject")
FileToCopy= "D:\Sample\Item1\Baitap.xls"
Des="D:\Sample\Item2\Baitap.xls"
fso.CopyFile FileToCopy, Des

Tuy nhiên nếu ta viết thế này thì code vẫn hiểu. Nếu ta không chỉ định tên file thì code sẽ lấy tên file gốc.
Nếu ta muốn đổi tên file thì code sẽ cho ta tên file mới với cùng nội dung trong file.

Dim fso As Object, FileToCopy As String, Des As String
Set fso = CreateObject("Scripting.FileSystemObject")
FileToCopy= "D:\Sample\Item1\Baitap.xls"
Des="D:\Sample\Item2\"
fso.CopyFile FileToCopy, Des

 

[Dat Mai]

Bạn tham khảo :

http://www.giaiphapexcel.com/diendan/threads/tổng-quan-về-filesystemobject.95898/


CopyFile (dùng để copy file(s) từ 1 thư mục đến thư mục khác)
Cái thú vị của lệnh này là nếu ta chỉ ra đường dẫn và tên file đích, thì code sẽ lấy tên file mà ta đã chỉ định.
Thông thường ta sẽ thực hiện code thế này để copy file

Dim fso As Object, FileToCopy As String, Des As String
Set fso = CreateObject("Scripting.FileSystemObject")
FileToCopy= "D:\Sample\Item1\Baitap.xls"
Des="D:\Sample\Item2\Baitap.xls"
fso.CopyFile FileToCopy, Des

Tuy nhiên nếu ta viết thế này thì code vẫn hiểu. Nếu ta không chỉ định tên file thì code sẽ lấy tên file gốc.
Nếu ta muốn đổi tên file thì code sẽ cho ta tên file mới với cùng nội dung trong file.

Dim fso As Object, FileToCopy As String, Des As String
Set fso = CreateObject("Scripting.FileSystemObject")
FileToCopy= "D:\Sample\Item1\Baitap.xls"
Des="D:\Sample\Item2\"
fso.CopyFile FileToCopy, Des

E chưa biết về pp sử dụng mã lệnh, chắc phải nghiên cứu thêm. E cảm ơn anh.

 

[Dat Mai]

Tìm thì có tiêu chí, điều kiện để tìm?
Danh sách tên file thì tìm bài lấy danh sách tên file trong folder...

E nghĩ là tiêu chí cũng rõ ràng rồi ạ, mh tìm file theo tên file trong danh sách. làm thế nào để có nhanh 1 folder chứa các file trong danh sách ạ

 

[HUYNHTIEN0202]

E nghĩ là tiêu chí cũng rõ ràng rồi ạ, mh tìm file theo tên file trong danh sách. làm thế nào để có nhanh 1 folder chứa các file trong danh sách ạ

Chào Bạn
Bạn đã làm được chưa nếu có cho mình xin đoạn code nha.
Cám ơn bạn nhiều.