如何（以编程方式）使用VBA计算当前ArcMap文档的路径

Question

我想要一个Visual Basic for Application Function，它显示当前文档的路径。

例如，如果ArcMap正在显示map.mxd，我需要显示其路径。

我发现只查询显示图层数据源路径的一些例子。

Answer 1

使用此：

Dim DocAbsPath As String
DocAbsPath = Application.Templates.Item(Application.Templates.Count - 1)

取自this帖子。