模糊地址如何查询详细省市县信息?
做地区可视化的同学可能经常需要使用地址去查询对应的经纬度方便我们精准制图,但是很多时候我们拿到的地址信息真的是杂乱无章,使用网上的转换工具根本没法处理,今天我们就交大家如何使用Excel轻松搞定这个问题,小白你都可以搞定!
https://restapi.amap.com/v3/geocode/geo?address=北京市朝阳区阜通东大街6号&output=XML&key=<用户的key>
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "B2" Then
[b5].ListObject.QueryTable.Refresh BackgroundQuery:=False
End If
End Sub
04 | 自定义函数与批量应用
简单修改一下,如果你有PQ基础看上去应该更好理解一些,没有基础的同学
稍微修改一下,通用一点,每次调用,填写x-查询内容和 自己的key即可
let
// x 查询内容, key- 申请的key
源 = (x, key)=>
let
a = try
Json.Document(
Web.Contents(
"https://restapi.amap.com/v3/geocode/geo?address="& x &"&key="&key)
)[geocodes]{0}[formatted_address]
otherwise null
in
#table({"查询信息","结果"},{{x,a}})
in
源
知识星球,VBA零基础从入门到精通,已经开始更新,感兴趣的可以看一下
赞 (0)