使用XMLHttpRequest的VBA代码总是返回#VALUE！ 在Excel中

我正在努力寻找地址

https://dev.virtualearth.net/REST/v1/Locations/40.6718266667,-73.7601944444?o=xml&key=AqF-lvBxcTAEbhY5v0MfOHxhplD5NyaznesQ1IA5KS_RNghU1zrDiYN704mlrc8A

这是（“//位置/名称”）

代码是：

Function FindALocationByPoint(Lat As String, Lon As String, BingMapsKey As String) As String Dim myRequest As XMLHTTP60 Dim uu As String uu = "https://dev.virtualearth.net/REST/v1/Locations/" & Lat & "," & Lon & "?o=xml&key=" & BingMapsKey Set myRequest = New XMLHTTP60 myRequest.Open "POST", uu, 0 myRequest.send FindALocationByPoint = myRequest.readyState 

（我知道最后一行应该是FindALocationByPoint = myRequest.responseXML.SelectNodes("//Location/Name").Item(0).Text ）也会返回#VALUE! 我认为主要的问题是不成功的连接到网站。

然后，单元格=FindALocationByPoint(K2,L2,$W$4)将返回#VALUE! 如果我删除myRequest.send那么单元格将返回1，这意味着服务器连接build立，对吧？

那么，为什么添加myRequest.send将返回#VALUE! ？

任何指导？

非常感谢。 我已经为此工作了两天。 如果我更改URL并将uu设置为另一个地理编码网站，则不存在任何问题。 那么这个网站有什么问题吗？（微软Bing）但是我必须使用Bing，如何处理这个？

谢谢，