如何在VBA中指定当前目录为path

我有一个macros启用工作表。 我需要指定启用macros的文件作为path存在的当前文件夹。 我试着设置

path = ActiveWorkbook.Path 

和

  path = CurDir() 

这两个都不适合我。 任何想法在这？

Answer 1

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

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

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

这应该写成

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

和

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

这应该写成

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

Answer 2

如果所需的path是运行macros的工作簿的path，并且该工作簿已保存，那么

ThisWorkbook.Path

是你会使用的。