Đi tìm giải pháp cho tìm kiếm và rename ! (1 người xem)

[khoa140383]

Chào cả nhà !
Khoa đang gặp vấn đề về tìm kiếm và rename với OCR trong win7 như sau :
+ Hằng ngày mình nhận được rất nhiều file pdf ( mỗi file có nhiều trang gồm invoice, packinglist, non-wood certificate… ) mỗi ngày nhận khoảng 200 bộ như vậy.
+ Sau đó mình phải upload lên hệ thống công ty, khổ nổi trước khi upload nó bắt phải cắt nhỏ ra và remane lại đúng theo format mới chịu.
+ Mình tìm được phần mềm cắt nhỏ file pdf rồi, nhưng lại lay hoay cái vụ rename ( sau khi cắt file thì nó lại không theo thứ tự nhất định, lúc thì invoice lên là “_1” nhưng lúc thì lại là “_2”, “_3” chẳng hạn ).
+ Hy vọng cả nhà có code nào hổ trợ dùm mình giống kiểu như window search OCR vậy….
+ Phương pháp rename :
Ø Invoice : DN no_inv.pdf
Ø Packing list : DN no_pkl.pdf
Ø Non-wood certificate : DN no._nwc.pdf

>>> Chúc cả nhà một buổi tối vui vẻ !!!

 

[khoa140383]

Có AD nào đi qua xin để lại lời nhắn, dù là... "tạm thời chưa có giải pháp nào cho vấn đề này" mình cũng vui mà... hic...

Chúc cả nhà buổi tối tốt lành !!!

 

[kuldokk]

Mình nghĩ với câu hỏi này của bạn và những gì bạn viết, khó có ai có thể giúp được gì. Khả năng đọc OCR từ VBA là có thể nhưng phần mềm đó phải mua bản quyền và chỉ chạy trên máy có phần mềm đó. Bạn có thể tham khảo từ khoá "AcroExch" với Google.

 

[khoa140383]

Mình nghĩ với câu hỏi này của bạn và những gì bạn viết, khó có ai có thể giúp được gì. Khả năng đọc OCR từ VBA là có thể nhưng phần mềm đó phải mua bản quyền và chỉ chạy trên máy có phần mềm đó. Bạn có thể tham khảo từ khoá "AcroExch" với Google.

Cám ơn bạn rất nhiều, mình sẽ tham khảo ý kiến của bạn !
Good night !!!

 

[dhn46]

Không thực sự hiểu ý bạn lắm, nhưng bạn thử tham khảo tiện ích Rename này xem, tôi viết cũng khá lâu rồi dùng để Rename tên file.

Bạn bấm Get File để lấy tên file gốc và rename tương ứng sang cột bên cạnh
Bấm Rename để thay đổi tên.

Hy vọng có thể giúp bạn 1 phần.

 

[khoa140383]

Không thực sự hiểu ý bạn lắm, nhưng bạn thử tham khảo tiện ích Rename này xem, tôi viết cũng khá lâu rồi dùng để Rename tên file.

Bạn bấm Get File để lấy tên file gốc và rename tương ứng sang cột bên cạnh
Bấm Rename để thay đổi tên.

Hy vọng có thể giúp bạn 1 phần.

Cám ơn bác đã nhiệt tình giúp đỡ, nhưng ý em muốn là tìm trong file pdf nếu thấy chữ invoice, packing list... thì rename tương ứng.... Nếu mà biết chính xác đuôi nó là gì thì em cũng đã tìm được code rồi.... thế em mới chạy lên đây cầu cứu cả diễn đàn.... hj

 

[chuot0106]

Không thực sự hiểu ý bạn lắm, nhưng bạn thử tham khảo tiện ích Rename này xem, tôi viết cũng khá lâu rồi dùng để Rename tên file.

Bạn bấm Get File để lấy tên file gốc và rename tương ứng sang cột bên cạnh
Bấm Rename để thay đổi tên.

Hy vọng có thể giúp bạn 1 phần.

Em dùng office 2013 code không hoạt động, anh Ninh có thể sửa code để nó có thể chạy trên office 2013 được không ạ?
-----------------------------------------
Đây là thông báo lỗi khi nhấn nút "GetFile"

 

[Hau151978]

Em dùng office 2013 code không hoạt động, anh Ninh có thể sửa code để nó có thể chạy trên office 2013 được không ạ?
-----------------------------------------
Đây là thông báo lỗi khi nhấn nút "GetFile"

Nguyên nhân có thể do chuot dùng Excel 64 bit, nếu như vậy thử chuyển những biến khai báo kiểu Long thành LongLong xem.

 

[chuot0106]

Nguyên nhân có thể do chuot dùng Excel 64 bit, nếu như vậy thử chuyển những biến khai báo kiểu Long thành LongLong xem.

Nhưng code bị khóa anh ạ!

 

[dhn46]

Nhưng code bị khóa anh ạ!

Đúng là do tôi sơ suất chưa mở khoá. Cái này cũng đã được anh Nghĩa Phúc nhắc rồi . Toàn bộ code bạn xem tại topic này
http://www.giaiphapexcel.com/forum/showthread.php?90985-Đổi-tên-file/page2

 

[Hau151978]

Nhưng code bị khóa anh ạ!

Code khóa thì dùng công cụ này của đại ca siwtom.