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 = 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.Pattern
    
    Next i
    Range("s11").Select
End Sub

补充说明:其中sheet2是工作表的名字,A指的是省份名字所在的列(见上面那张截图)。根据自己的需要可以改成你喜欢的名字或位置。

第七步:将分离的图片的图片画布跟各个图片对象分开,然后复制该地图。并且粘贴到合适位置后,将粘贴类型选择为“链接图片”,图例也可以类似的做法。那么点击按钮就可以了!

地图还可以是各个省或市的,大家可以直接做一个属于自己数据的地图了。 

猜你喜欢

转载自blog.csdn.net/liujh845633242/article/details/84953033
今日推荐