1700430020
宏录制器就像一个录像机，它可以把你的绝大部分操作都录制下来，转换为宏代码。运行这些代码的效果就是把刚才的操作重新进行一次。如果我们将宏代码进行简单的编辑、修改，就可以快速批量完成很多重复性操作。
1700430021
1700430022
在Excel 2003中，单击菜单工具→宏→录制新宏即可打开录制宏的对话框，如图A-7所示。
1700430023
1700430024
1700430025
1700430026
1700430027
图A-7 Excel 2003版本的宏录制器
1700430028
1700430029
在Excel 2007以上版本中，宏录制器默认是看不见的，需要通过设置调出来。以Excel 2010版本为例，在菜单文件→选项→自定义功能区→主选项卡下，勾选开发工具，确认之后，在Excel界面的主选项卡中就会出现开发工具，里面就有录制宏的按钮，如图A-8所示。另外，在Excel 2010左下角的状态栏上，也有个录制宏的小按钮，可以快速进入。
1700430030
1700430031
1700430032
1700430033
1700430034
图A-8 Excel 2010版本的宏录制器
1700430035
1700430036
如何进行录制宏操作呢？以3.1节的分档填色地图做法为例，我们要用某个单元格的填充色去填充某个地图图形，因此需要知道：如何获知一个单元格的填充色，如何设置一个图形的填充色。那么我们可以进行以下的录制宏操作。
1700430037
1700430038
单击开发工具选项卡下的录制宏，出现如图A-9所示的对话框。
1700430039
1700430040
1700430041
1700430042
1700430043
图A-9 录制新宏的对话框
1700430044
1700430045
可以直接单击确定按钮，Excel将对接下来的操作录制宏。下面进行如下的操作：
1700430046
1700430047
①选中单元格A1；
1700430048
1700430049
②设置单元格A1的填充色为某种颜色；
1700430050
1700430051
③选中某个地图图形；
1700430052
1700430053
④设置该地图图形的填充色为某种颜色。
1700430054
1700430055
然后，单击停止录制按钮，终止录制宏操作。按Alt+F11键进入VBA编辑窗口，会看到如图A-10所示的界面。
1700430056
1700430057
1700430058
1700430059
1700430060
图A-10 通过录制操作得到的宏代码
1700430061
1700430062
左侧的工程窗口中，在模块目录下有个“模块1”对象，右侧名为Macro1的宏代码就是刚才录制宏操作的结果[1]，其中有两句关键代码：
1700430063
1700430064
①Selection. Interior. ColorIndex=1（设置A1单元格填充色）：
1700430065
1700430066
②Selection. ShapeRange. Fill. ForeColor. SchemeColor=8（设置地图图形填充色）
1700430067
1700430068
我们将其组合起来，让地图图形的填充色=A1单元格的填充色，并略作修改，再加入按区域个数的循环，得到如图A-11所示的代码。这段宏完成的任务就是：对每个区域的图形使用对应的颜色号（如color1）作为名称所指向的单元格的填充色来填充，绘制出一个分档填色的热力地图。
1700430069