1700428031
注意以上代码需要先在VBA工程窗口的菜单工具→引入窗口中勾选Microsoft Office Word的对象库之后才能运行。
1700428032
1700428033
4．为地图图形填色。
1700428034
1700428035
再把I列单元格的填充色复制到对应的地图图形就简单了，这与3.1节分档填色中的做法是一样的。
1700428036
1700428037
编写一小段宏，用I列的填充色去填充对应省份的地图图形。代码如图3-10所示，其实只有1行。
1700428038
1700428039
1700428040
1700428041
1700428042
图3-10 按单元格底色填充地图图形的宏代码
1700428043
1700428044
将这个宏指定给一个矩形框，作为一个填色按钮。单击按钮，各省地图图形即被填充为对应的颜色，与D列的填充色一致。一个条件格式的HeatMap已经生成，请检查并确认填色正确。
1700428045
1700428046
5．整合地图图形及图例，便于导出。
1700428047
1700428049
1700428050
本做法的优点是：
1700428051
1700428052
●色阶是无级渐变的，地图的填色精确对应源数据数值的大小。也省去了分档填色做法中设置分档阈值和图例的麻烦。
1700428053
1700428054
●可以充分利用Excel 2007色阶功能的特性，灵活设置出自己想要的各种HeatMap效果，如单色渐变、双色渐变，操作也很方便。尤其适合于数据范围从负数变化到正数的二分情况。
1700428055
1700428056
本做法涉及的知识点有：色阶条件格式，特殊效果的复制粘贴方法，录制并修改宏代码，拍照引用，自定义格式“;;;”等。
1700428057
1700428058
懒人直接用
1700428059
1700428060
在随书范例包中找到并打开“3.3条件格式填色做法.xlsm”文件，启用宏。
1700428061
1700428062
●在D11:D63列填入你的数据。为效率起见，建议使用VLOOKUP函数从其他区域查找引用过来。
1700428063
1700428065
1700428066
●单击复制按钮，或按前文第3步描述的方法，将D列的条件格式复制为I列的单元格格式。
1700428067
1700428068
●单击填色按钮，生成地图。导出地图时复制拍照对象即可。
1700428069
1700428070
用地图说话：在商业分析与演示中运用Excel数据地图 [:1700427097]
1700428071
3.4 气泡式数据地图
1700428072
1700428073
气泡式数据地图也是一种常见的数据地图，它是在地图上相应位置显示相应的气泡，以气泡的大小代表各区域指标值的大小。气泡式数据地图可以避免区域之间面积差异悬殊时可能带来的视觉误导。图3-11显示了2009年金融危机中，3家公司在各地关闭零售门店的数量比较。
1700428074
1700428075
1700428076
1700428077
1700428078
图3-11 气泡式数据地图 例图来源：《商业周刊》杂志
1700428079
1700428080
作图思路