EXCEL VBA:判断文件是否存在

2013-08-15 16:47 阅读 581 次 评论关闭

关于excel vba判断文件是否存在,一般有如下的两种方式。

请根据情况,选择一种适合你的方法。

一、通过FileExists判断文件是否存在

Dim MyFile As Object

Set MyFile = CreateObject("Scripting.FileSystemObject")

If MyFile.FileExists("E:\dzwebs\Pic\logo.gif" ) = True Then

MsgBox  "文件存在"

Else

MsgBox  "文件不存在"

End If

以上代码在VBA环境下使用。或者将其制作成为宏也可以。"E:\dzwebs\Pic\logo.gif"为文件路径及文件名称,可自行修改。

二、通过Dir来判断

Dim YouFile As String

YouFile = Dir("E:\MyPictures\Pic\logo.gif")

If x <> "" Then

MsgBox  "文件存在"

Else

MsgBox  "文件不存在"

Endif

"E:\MyPictures\Pic\logo.gif"为文件路径及文件名称,可自行修改。当然,如上代码,也在VBA下使用,可自作成为宏或函数都可以。

上面的两种方法,本站推荐你使用第一种方法,因为第一种方法比较符合逻辑思维。

版权声明:本文著作权归原作者所有,欢迎分享本文,谢谢支持!
转载请注明:EXCEL VBA:判断文件是否存在 | 猎微网
分类:未分类 标签:, , , , ,

评论已关闭!