vba的IsFileExists显示出函数或子过程未定义

经常看见vba的IsFileExists显示出函数或子过程未定义,我的问题就是IsFileExists函数没写所以出问题,在相应的模块下加如下代码即可:

Function IsFileExists(ByVal strFileName As String) As Boolean
    Dim objFileSystem As Object
 
   Set objFileSystem = CreateObject("Scripting.FileSystemObject")
   If objFileSystem.fileExists(strFileName) = True Then
      IsFileExists = True
    Else
        IsFileExists = False
    End If
End Function


本文来自互联网用户投稿,文章观点仅代表作者本人,不代表本站立场,不承担相关法律责任。如若转载,请注明出处。 如若内容造成侵权/违法违规/事实不符,请点击【内容举报】进行投诉反馈!

相关文章

立即
投稿

微信公众账号

微信扫一扫加关注

返回
顶部