Làm thế nào để kiểm tra xem một tệp có tồn tại trong một thư mục cụ thể hay không?
Giả sử, bạn có một thư mục chứa nhiều tệp và bây giờ, bạn muốn xác định xem một tệp cụ thể có tồn tại trong thư mục này từ Excel hay không. Bài viết này, tôi sẽ giới thiệu một phương pháp nhanh chóng để bạn kiểm tra xem tệp có tồn tại trong một thư mục cụ thể hay không thông qua Excel.
Kiểm tra xem tệp có tồn tại trong một thư mục cụ thể với mã VBA không
Kiểm tra xem tệp có tồn tại trong một thư mục cụ thể với mã VBA không
Để kiểm tra xem tệp có tồn tại trong một thư mục cụ thể hay không trong trang tính Excel, bạn có thể áp dụng mã VBA sau, vui lòng thực hiện như sau:
1. Giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.
2. Nhấp chuột Chèn > Mô-đunvà dán mã sau vào Cửa sổ mô-đun.
Mã VBA: Kiểm tra xem tệp có tồn tại trong một thư mục cụ thể hay không:
Sub Test_File_Exist_With_Dir()
'Updateby Extendoffice
Application.ScreenUpdating = False
Dim FilePath As String
FilePath = ""
On Error Resume Next
FilePath = Dir("C:\Users\DT168\Desktop\Test folder\Book2.xlsx")
On Error GoTo 0
If FilePath = "" Then
MsgBox "File doesn't exist", vbInformation, "Kutools for Excel"
Else
MsgBox "File exist", vbInformation, "Kutools for Excel"
End If
Application.ScreenUpdating = False
End Sub
Lưu ý: Trong đoạn mã trên, bạn nên thay đổi đường dẫn và tên tệp C: \ Users \ DT168 \ Desktop \ Test folder \ Book2.xlsx " theo nhu cầu của bạn.
3. Sau khi dán mã, vui lòng nhấn F5 phím để chạy mã này:
(1.) Nếu tệp tồn tại, bạn sẽ nhận được ảnh chụp màn hình sau:
(2.) Nếu tệp không tồn tại, bạn sẽ nhận được cảnh báo sau:
Công cụ năng suất văn phòng tốt nhất
Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian. Bấm vào đây để có được tính năng bạn cần nhất...
Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều
- Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
- Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
- Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!