vba03-1.txt

来自「一个基于ARCGIS的VBA开发代码,本人用它做过很多VBA开发,非常不错!」· 文本 代码 · 共 6 行

TXT
6
字号
Sub MyMacro()
    Dim pMxDocument As IMxDocument
    Set pMxDocument = Application.Document
    MsgBox pMxDocument.FocusMap.Name
End Sub

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?