如何（以编程方式）找出当前ArcMap文档与VBA的路径

Question

我希望Visual Basic for Application Function能够显示当前文档的路径。

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

我只找到了一些查询显示图层数据源路径的例子。

Answer 1

使用此：

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

从this线程服用。