1700428020
②新建一个Word文件，按Ctrl+V键粘贴。
1700428021
1700428022
③然后再从Word中复制回来，粘贴到I11:I63区域。
1700428023
1700428024
这样也可以实现将条件格式转换为静态单元格格式的目的。并且这个过程可以使用VBA自动化，如图3-9所示。在范例文件中，我们已将此宏赋给一个按钮复制，故此步骤只需单击该按钮即可。
1700428025
1700428026
1700428027
1700428028
1700428029
图3-9 通过Word获得条件格式所产生的颜色
1700428030
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