如何将当前目录指定为 VBA 中的路径？

【问题标题】：How to specify the current directory as path in VBA?如何将当前目录指定为 VBA 中的路径？
【发布时间】：2012-04-30 05:33:18
【问题描述】：

我有一个启用宏的工作簿。我需要将启用宏的文件所在的当前文件夹指定为路径。我试过设置

path = ActiveWorkbook.Path

和

path = CurDir()

但这些都不适合我。对此有什么想法吗？

【问题讨论】：

标签： vba excel

【解决方案1】：

如果您想要的路径是运行宏的工作簿的路径，并且该工作簿已保存，那么

ThisWorkbook.Path

是你会使用的。

【讨论】：

【解决方案2】：

我以为我误解了，但我是对的。在这种情况下，它将是ActiveWorkbook.Path

但主要问题不在这里。问题出在这两行代码

strFile = Dir(strPath & "*.csv")

应该写成

strFile = Dir(strPath & "\*.csv")

和

With .QueryTables.Add(Connection:="TEXT;" & strPath & strFile, _

应该写成

With .QueryTables.Add(Connection:="TEXT;" & strPath & "\" & strFile, _

【讨论】：