現在のドキュメントのパスを表示する Visual Basic for Application Function が欲しいです。
たとえば、ArcMap が表示map.mxd
されている場合、そのパスを表示する必要があります。
表示されたレイヤーのデータソースのパスを照会するためのいくつかの例しか見つかりませんでした。
これを使って:
Dim DocAbsPath As String
DocAbsPath = Application.Templates.Item(Application.Templates.Count - 1)
このスレッドから取得。