我一直在使用excel查询,为什么我不能从
获取数据http://bet.hkjc.com/racing/pages/odds_wpq.aspx?date=21-11-2015&venue=st&lang=en
我该怎么办?
我几天都在挣扎,你能不能帮我写一个excel vba
的代码。
我已经尝试过很多搜索,比如雅虎谷歌
这就是我想要的表格
答案 0 :(得分:0)
根据您的Excel版本,您可以从Microsoft下载免费的Power Query加载项(Excel 2010和2013)或使用新的Get&在Excel 2016中进行转换。
这些查询确实识别页面上的表格如表5和表6所示.M代码中的查询是
表5
let
Source = Web.Page(Web.Contents("http://bet.hkjc.com/racing/pages/odds_wpq.aspx?date=21-11-2015&venue=st&lang=en")),
Data5 = Source{5}[Data],
#"Changed Type" = Table.TransformColumnTypes(Data5,{{"Column1", type text}, {"Column2", type text}, {"Column3", type text}, {"Column4", Int64.Type}, {"Column5", Int64.Type}, {"Column6", Int64.Type}, {"Column7", Int64.Type}, {"Column8", Int64.Type}, {"Column9", Int64.Type}, {"Column10", type text}, {"Column11", type text}, {"Column12", type text}, {"Column13", type text}, {"Column14", type text}, {"Column15", type text}, {"Column16", type text}, {"Column17", type text}}),
#"Promoted Headers" = Table.PromoteHeaders(#"Changed Type")
in
#"Promoted Headers"
类似于表6.将它们加载到工作簿中并从那里获取它。您可以随时刷新查询。