ArcGIS实践教程（25）ArcGIS/ArcMap中运行VBA的方法

1)，运行ArcMap，加载所需图层；

2)，Tools菜单/Macros(宏）/Visual Basic Editor(VB编辑器)，这样打开VB编辑器

3)，双击打开VB编辑器左上工程资源管理器中的Project/ArcMap对象/ThisDocument，把上面的代码粘进去。注意看首行Option Explicit如果有两行，就删除一行。

4)，点击VB编辑器工具栏的运行按钮运行（或菜单 运行/运行子过程），就可以了，再激活ArcMap可以看到发生了什么！

或者还有一种创建宏的方法（不过建议对ArcGIS VBA不大熟的同志不要用这种方法）：

1)，运行ArcMap，加载所需图层；

2)，Tools菜单/Macros(宏）/Macros，这样打开宏编辑器

3)，在宏名称中输入aaa，确定后，会打开VB编辑器，将看到有一个aaa的过程，没有实体。你把上面的aaa过程中的代码粘进去，然后在前面加上

Option Explicit（这个别重复了哈）

Dim dPoint(2, 1) As Double

就可以。

4)，点击VB编辑器工具栏的运行按钮运行（或菜单 运行/运行子过程），就可以了，再激活ArcMap可以看到发生了什么！

手册目录

本手册的全部内容：ArcGIS实践教程汇总