通过Power Query查询快递信息

Excel实战分享

现在越来越流行网上购物了，很多小伙伴会去网购一些心仪的商品，接下来就是等快递了。

只要输入快递单号，就可以通过Power Query可以查询到相关快递信息了，上两个图，看看效果先。
--------------------------------------------------------------------------------------------------------------



--------------------------------------------------------------------------------------------------------------

1. (快递单号 as number) as table=>
   
2. let
   
3.     url="http://m.kuaidihelp.com/express/queryResult",
   
4.     content=Text.ToBinary("brand=&waybill="&Text.From(快递单号)),
   
5.     headers=[#"X-Requested-With"="XMLHttpRequest",#"Content-Type"="application/x-www-form-urlencoded; charset=UTF-8"],
   
6.     web= Json.Document(Binary.Buffer(Web.Contents(url,[Headers=headers,Content=content]))),
   
7.     table=if web[msg]="成功" then #table({"时间",web[data][brand_name]},List.Transform(web[data][list],each {Text.Replace([date],"<br/>","    "),[info]})) else #table({},{})
   
8. in
   
9.     table

复制代码

1. let
   
2.     源 = 快递信息查询(82042688)
   
3. in
   
4.     源

复制代码

PQ小学生

不能用啊啊啊