作者:小北童鞋
来源:芒种学园(ID:lazy_info)
近期在学习群中收到了不少小伙伴的提问:在 Excel 中怎么绘制省、市、县的地图数据,Excel 中的地图图表实在太少了。
利用 Power Map 来绘制的话效果太差了,没法定制化不说,兼容性还有问题。
而且Power Map在国内去年5月就突然就没法使用了!
而且PowerBI绘图功能虽然强大,但是在自定义图表方面,如果官方不支持,几乎没有办法可以解决!亦或者解决成本过高!
其实在 Excel 中还可以利用形状来绘制地图,非常简单,而且支持实时更新。
而且利用Excel地图+多饼图的方式还可以轻松实现『地图饼图』地效果:
制作的方法其实也非常简单,两步即可轻松搞定~
地图下载与预处理
既然是形状地图,那么就需要将形状导入到 Excel 中。
在这里我们可以利用「阿里云DataV地图数据可视化平台」导出想要的省、市、县数据,网址如下:
网址:http://datav.aliyun.com/portal/school/atlas/area_selector
▲左右滑动查看完整数据
这是一个基于高德开放平台提供的地图导出服务,在这里可以导出到最详细的乡镇可编辑形状地图,而且步骤也非常简单:
打开DataV平台,找到想要可视化的地图数据;
然后在左侧点击「下载SVG」即可;
例如我们要可视化广东的各城市数据,找到广东的下载即可:
接下来将 SVG 图片导入到 Excel 中,效果如下:
接下来依次点击地图中的每个城市,给形状进行命名,如下:
这里的命名名称一定要和数据源的名称保持一致,否则后续会出错,并且所有城市都要命名。
或者你觉得这样导出的地图太过于单调,也可以在高德开发者中心中,选择自定义地图,通过自定义地图可以创建更多丰富的地图形状~
地图数据可视化
接下来在 J11:K15 创建颜色+区间范围,如下,并且在 L11 单元格提取数据。
效果如下:
然后将需要可视化的数据粘贴到 N1:O22 区域,如下:
接下来就可以右击 Sheet 名,选择「查看代码」,将这部分 VBA 代码粘贴到窗口中,代码如下:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim m As Integer
Dim rg As Range
On Error Resume Next
If Target.Column = 15 Then
For Each rg In Target
m = Application.Match(rg.Value, [l:l])
-1).Value).Select
Cells(m, "j").Interior.Color =
Next rg
End If
End Sub
▲左右滑动查看完整代码
这段代码的意思是,当检测到表格修改的时候,就会更新地图的颜色~
现在一幅可以自己更新的可视化地图就完成啦~
整体难度不大,并且支持定制化,除了热力图,甚至还能实现立体高度图,简单吧!
Excel地图+多饼图的实现思路
前面还提到过『地图饼图』的制作,其实思路也非常简单,在Excel中插入饼图,然后将饼图的『填充』设置为空,删除『标题』。
效果如下:
然后将饼图拖动到合适的位置上,就可以实现『地图饼图』效果。
当然如果会一点点js,还可以在高德地图开放平台直接使用js来辅助设计图表,效果会更佳,而且更简单。
高德开放平台地址:https://lbs.amap.com/
好了,以上就是今天分享的全部内容,你学会了么?
关于「地图可视化」的技巧分享就到这里了,你平时有使用过这个快捷键么?
希望对你有帮助呀,我是小北,还有什么想学习的,欢迎在评论区留言告诉我们呀~
下面是关于《Excel数据大屏福袋》的详细介绍,感兴趣的小伙伴可以瞅瞅~