我有一台启用宏的WorkBook。我需要指定当前文件夹中包含启用宏的文件的路径。我尝试设置

path = ActiveWorkbook.Path




path = CurDir()


但是这些都不适合我。有什么想法吗?

最佳答案

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

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

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


哪个应该写成

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




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


哪个应该写成

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

07-24 20:49