excel2010制作中国数据地图数据可视化

前两天，一同事问我如何用excel做数据地图，当时我是完全不知怎么下手，然后上网跟着教程学习，做出了自己的一个地图模板。
第一步：从网上下载高清的地图（可以是中国地图，也可以是省市地图）。但是这张地图必须满足下面两个要求：
（1）地图的边界要清晰
（2）svg格式的图(Scalable Vector Graphics)。可以从网站：Wikimedia Commons 上搜索到。但是下载的时候要选择
文章图片
，这样下载的图片是最清晰的。
第二步：下载并安装免费开源的软件：Inkscape，用这个软件打开svg的图片。然后另存为增强图元型文件（emf）格式的。
第三步：将图片插入到excel的一个工作表中。并选中该图片后，右击菜单中选择“取消组合”命令，图片就都分离开了。

文章图片

第四步：选中每个省的版块后，定义名称。简单的方法：鼠标点击选一个省，在左上角公式旁边的文本框里输入省的名字，如下图：

文章图片

第五步：在excel里新建一个工作表，按照下图来设计数据版面、定义名称，还有编辑的两个公式如下图2：

文章图片

文章图片

渐变颜色可以自己选择，目前这个例子是从0到5六种类别(颜色)，根据你的研究需要随便改多少种都可以，唯一注意的就是命名的区域要跟着变。
第六步：在工作表中加个按钮,然后把下面这段代码复制进去：

Private Sub 开始填充_Click() For i = 2 To 32 Range("ActReg1").Value = https://www.it610.com/article/Range("sheet2!A" & i).Value ActiveSheet.Shapes(Range("ActReg1").Value).Select Selection.ShapeRange.Fill.ForeColor.RGB = Range(Range("ActRegCode1").Value).Interior.Color 'Selection.ShapeRange.Fill.Patterned Range(Range("ActRegCode").Value).Interior.PatternNext i Range("s11").Select End Sub

补充说明：其中sheet2是工作表的名字，A指的是省份名字所在的列(见上面那张截图)。根据自己的需要可以改成你喜欢的名字或位置。
第七步：将分离的图片的图片画布跟各个图片对象分开，然后复制该地图。并且粘贴到合适位置后，将粘贴类型选择为“链接图片”，图例也可以类似的做法。那么点击按钮就可以了！