1700428181
1700428182
现在我们要根据各省I列的颜色号，对气泡填充相应的颜色，这是热力气泡式数据地图的主要特征，也是本做法的关键点。
1700428183
1700428184
Excel中插入的图表，默认的名称为“图表1”或“chart 1”之类的，比较好的习惯是先为图表命名一个有意义的名称，便于后续引用。所以我们先给气泡图命个名。
1700428185
1700428186
若使用2003版本，按住Ctrl键，用鼠标选中气泡图，在Excel左上角的名称框中输入“my_map_chart”，回车，即完成了气泡图的命名。
1700428187
1700428188
若使用2007以上版本，选中气泡图→图表工具选项卡→布局→属性→图表名称，输入“my_map_chart”，回车。显然2003版本的操作更为简便。
1700428189
1700428190
我们不知道设置气泡填充色的代码该如何写，但可以对以下操作录制宏：
1700428191
1700428192
选中气泡图数据系列→再选中某个数据点→设置一种填充色→设置透明度为50％。
1700428193
1700428194
根据得到的宏代码，修改、编写如图3-15所示的宏代码。
1700428195
1700428196
1700428197
1700428198
1700428199
图3-15 设置气泡图数据点填充色的宏
1700428200
1700428201
这段宏代码将对气泡图的每个数据点，使用对应省I列的值作为名称所指向的K列对应单元格的颜色进行填充，并同时设置透明度，使之呈现半透明的效果。若使用2003版本，将不支持设置透明度，可省略此特征。
1700428202
1700428203
使用窗体控件或矩形框，绘制一个按钮，为其指定宏为fill_bubble_color。现在单击按钮，各个气泡即被自动填色，请检查所填颜色正确无误。
1700428204
1700428205
4．为地图添加图例和标签。
1700428206
1700428207
热力气泡式数据地图需要两个图例。一是代表数值大小的气泡，这与气泡式数据地图做法一样，使用往下延展的图例辅助数据。二是代表增幅大小的颜色，这与热力地图做法一样，对单元格区域K7:L16进行拍照，将拍照图片放置到地图的合适位置作为图例。
1700428208
1700428209
若需为气泡添加数值标签，可使用标签修改工具XY Chart Labeler[4]设置显示为H列。
1700428210
1700428211
最后完成的地图如图3-16所示，与例图效果几无二致。
1700428212
1700428213
1700428214
1700428215
1700428216
1700428217
1700428218
1700428219
图3-16 热力气泡式数据地图
1700428220
1700428221
热力气泡式数据地图的优点是可以在地图上同时反映两个分析变量。
1700428222
1700428223
本做法涉及的知识点有：气泡图，VLOOKUP模糊查找，定义名称，命名图表，录制和编写宏，标签修改工具等。
1700428224
1700428225
懒人直接用
1700428226
1700428227
在随书范例包中找到并打开“3.5热力气泡式数据地图.xls（或.xlsm）”文件，启用宏。
1700428228
1700428229
●在F和G列输入你的指标数值，如销售额和同比增幅数据，这时会看到气泡图大小即时发生变化。同时输入第一个变量的图例辅助数据。
1700428230