Question

我想问下VBA 中的DIR 结合的thisworkbook.path 用法

Sub dd()
If Dir(ThisWorkbook.Path & "\照片，vbdirectory") = "" Then
MsgBox "不存在"
Else
MsgBox "存在"
End If
End Sub
我的THISWORKBOOK.PATH路径在C盘桌面
我C盘桌面上有 照片这个文件夹 和*.XLS文件 但是用DIR都是显示不存在 为什么 谢谢你们

Answer 1

你的Dir函数参数写错了。

应该是：

If Dir(ThisWorkbook.Path & "\照片", vbDirectory) = "" Then
 .....

注意那个逗号，要用西文的，你的是中文的。

写代码要注意全角、半角的区别。