Do File cũ có 1 số Control trên máy của các bạn không có nên phát sinh nhiều lỗi không mong muốn, hiện nay tôi kiểm tra lại và bỏ các Control đó để các bạn sử dụng bất kỳ Office và bất kỳ máy nào cũng đều dùng được.
Hôm nay tôi tải lên 1 File khác đã bỏ việc tìm trên Form, nhưng bổ sung thêm chức chức năng tim kiếm nhiều tiêu chí và xuất File ở sheet LOC_VANBAN, đồng thời cho phép tạo Link ngay số văn bản đến và số văn bản đi để mở File:
1/ Tìm kiếm: ở dòng 2 của sheet LOC_VANBAN, để tìm kiếm trước tiên xóa hết dữ liệu trong các Cell màu xanh, muốn tìn cái gì thì click vào 1 Cell màu xanh chọn 1 loại xong nhấn nút Lọc VB tại chỗ, nếu muốn lọc và xuất ra File với nội dung vừa lọc thì nhấn nút Lọc VB và Xuất ra File mới.
2/ Tạo Link cho File Scan số văn bản đến hoặc File văn bản đi: Trong sheet VAN_BAN gõ số văn bản đến, xong nhấn nút Lấy Link sẽ hiện Form ra, click vào nút tìm File nó sẽ hiện ra hộp thoại cho phép tìm đến File văn bản và click chọn File cần Link ong nhấn nút Open, trở về Form và nhấn nút Tạo Link, kể từ đây khi click và số văn bản đó nó sẽ mở File đó ra.
Lưu ý: nếu không gõ số văn bản nó vẫn lấy Link là nguyên cả đường dẫn đến File đó.
- Thêm 1 cái quan trọng: Trước khi sử dụng các bạn click vào nút TRANG_CHU nó sẽ hiện thống báo lỗi, click vào nút Debug các bạn thấy tại dòng code.
Sheets("XuatFile_VANBAN").Select (màu vàng)
Thêm dòng code này vào ngay bên dưới nó:
Selection.ColumnWidth = 65
Xong click nút Reset (có hình vuông màu xanh trên menu) và nhấn Alt+F11 để trở ra bảng tính, tiếp theo Insert thêm 1 sheet mới và đặt tên là:
XuatFile_VANBAN (có sheet này thì mới xuất được File)
Bây giờ các bạn sử dụng File trên vô tư rồi.
