Dim fso As FileSystemObject Set fso = New FileSystemObject
If Not fso.FileExists(sPath & sFile) Then
If bRetry Then
Beep
If MsgBox("File, " + sPath + sFile + " , not found!", vbCritical + vbRetryCancel, "File Access Error") = vbCancel Then
Exit Function
Else
GoTo Research
End If
End If
Else
FileExist = True
End If
标签：vba,sPath,End,是否,校验文件,fso,sFile,Else From： https://www.cnblogs.com/Insist-Y/p/17246492.html