1700428352
1700428353
Call copy_paster_minichart ‘方便起见，一起调用
1700428354
1700428355
让程序同时调用粘贴小图表的宏，一次性做完“绘制地图上的图表”的步骤。这样，后一个按钮可以省略，也可以作为微调小图表格式后刷新地图之用。
1700428356
1700428357
最后，将地图所在的U7:AC34区域拍照为一个图片，便于引用到Word或PPT中。至此，一个图表式数据地图生成模板已经完成。
1700428358
1700428359
9．为饼图形式的地图增加图例。
1700428360
1700428361
当选择饼图或圆环图类型时，可能需要在地图上显示图例，其他图表类型则不需要图例。可以利用一个小技巧让模型具备这个功能。
1700428362
1700428363
将饼图形式的小图表复制一份，调整格式至图例大小合适，并让其图例对准到单元格区域S26:S29，然后将该此区域拍照，得到一个拍照图片，放置到地图的左下方空白处，作为图表的图例。
1700428364
1700428365
定义一个动态名称：
1700428366
1700428367
pie_legend：=IF(or($O$6=4, $O$6=5),$S$26:$S$29,R32)
1700428368
1700428369
即选择饼图或环形图时，返回刚才的拍照图例区域，否则返回一个空白区域。
1700428370
1700428371
选中刚才拍照所得的图片，在公式栏中修改其引用为：=pie_legend。再测试模型时你就会发现，选择饼图或圆环图形式，地图有图例；选择其他形式，地图无图例。这是本模型智能化的特点之二。
1700428372
1700428373
模型可生成的各种形式的数据地图效果如图4-4所示。
1700428374
1700428375
1700428376
1700428377
1700428378
1700428379
1700428380
1700428381
1700428382
1700428383
1700428384
图4-4 不同图表类型的图表式数据地图
1700428385
1700428386
本做法的基本要点与气泡式数据地图类似，涉及的新增关键知识点有两点：将图表复制为图片，向图表的数据序列粘贴图片。
1700428387
1700428388
一次偶然的灵光乍现，我突然想到了这个做法思路，赶紧动手尝试是否可行，结果居然成功了！自己也几乎拍案叫绝。有了这个做法，我才终于感到本书需要介绍的地图做法圆满了，因为本做法相当完美地仿制了专业地图软件最主要的功能。
1700428389
1700428390
本模型可以快速改造为其他各省的图表式数据地图，这只需要将气泡图绘图区的填充图片更换为相应的地图图片，同时通过调整x、y数值来调整气泡的位置即可。而如果你使用Excel 2003版本的话，调整气泡位置只需要直接拖拽气泡就可以！
1700428391
1700428392
采用图表式数据地图时，不宜在地图上放置过多的图表，否则极易混乱不清，丧失其直观性和易读性。以中国地图为例，建议小图表个数控制在10个以内，最好只有3～6个，并且地图的尺寸也需要足够大。
1700428393
1700428394
懒人直接用
1700428395
1700428396
当然了，懒人不必这么麻烦，你可以直接使用本书的随书模板。在随书范例包中找到并打开“4.1图表式数据地图.xls（或.xlsm）”文件，启用宏。
1700428397
1700428398
●在C5:I15区域输入你的数据。根据省的个数延展相应公式，x、y位置参考数据可从J26处复制取用。要调整每个省的作图数据点个数，可自己增加或删除列，但要同时修改图4-3中代码的Range部分。
1700428399
1700428400
●通过列表框选择想要的图表类型。由于范例文件在第8步使用了call调用，那么现在你已经得到了一个更新的图表式数据地图。
1700428401