如何在VBA中获取当前工作表的路径？

Question

我写了一个宏作为 add = in 。我需要获取当前正在执行它的工作表的路径。我该怎么做呢？如何获取文件路径（只是目录）？

Answer 1

仅使用Application.ActiveWorkbook.Path作为路径本身（不包含工作簿名称）或使用Application.ActiveWorkbook.FullName作为路径 工作簿名称。

Answer 2

总是很高兴：

Dim myPath As String     
Dim folderPath As String 

folderPath = Application.ActiveWorkbook.Path    
myPath = Application.ActiveWorkbook.FullName

Answer 3

如果要从执行宏的位置获取工作簿的路径 - 请使用Application.ThisWorkbook.Path。
Application.ActiveWorkbook.Path有时可能会产生意外结果（例如，如果您的宏在多个工作簿之间切换）。

Answer 4

最快的方法

path = ThisWorkbook.Path