Excel_VBA 检查文件存在性

Sub 按钮3_Click()

Dim fileName As String
fileName = "C:\recsFn.txt"
If Dir(fileName) = "" Then '文件不存在
Debug.Print "文件不存在";
Else
Debug.Print "文件存在"

End If

End Sub