我有一个启用宏的工作簿。我需要将启用宏的文件所在的当前文件夹指定为路径。我试过设置
path = ActiveWorkbook.Path
和
path = CurDir()
但这些都不适合我。对此有任何想法吗？
问问题
127255 次
2 回答
32
如果您想要的路径是运行宏的工作簿的路径，并且该工作簿已保存，则
ThisWorkbook.Path
是你会使用的。
于 2012-04-18T19:04:12.690 回答
7
我以为我误解了，但我是对的。在这种情况下，它将ActiveWorkbook.Path
但主要问题不在这里。问题在于这两行代码
strFile = Dir(strPath & "*.csv")
应该写成
strFile = Dir(strPath & "\*.csv")
和
With .QueryTables.Add(Connection:="TEXT;" & strPath & strFile, _
应该写成
With .QueryTables.Add(Connection:="TEXT;" & strPath & "\" & strFile, _
于 2012-04-18T20:14:10.843 回答