如何检查特定文件夹中是否存在某个文件？

如果你有一个包含多个文件的文件夹，并且需要确定某个特定文件是否存在，Excel 可以帮助你自动化这个任务。本文提供了一种简单的 VBA 方法来检查某个文件是否存在于指定文件夹中。

使用 VBA 代码检查特定文件夹中是否存在某个文件

使用 VBA 代码检查特定文件夹中是否存在某个文件

要检查某个文件是否存在于 Excel 工作表中的特定文件夹中，你可以应用以下 VBA 代码，请按如下步骤操作：

1. 按住 ALT + F11 键打开 Microsoft Visual Basic for Applications 窗口。

2. 单击 插入 > 模块，并将以下代码粘贴到模块窗口中。

VBA 代码：检查某个文件是否存在于特定文件夹中：

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 exists", vbInformation, "Kutools for Excel"
    End If
    Application.ScreenUpdating = False
End Sub

备注：在上述代码中，你需要根据需求更改 文件路径 和 名称 C:\Users\DT168\Desktop\Test folder\Book2.xlsx"。

3. 粘贴完代码后，请按 F5 键运行此代码：

（1.）如果文件存在，你会看到以下截图：

（2.）如果文件不存在，你会收到以下警告：