Excel Macro http GET无法连接到互联网

Question

我已经编写了一个短宏[下面]来测试GET调用。这个宏适用于已经测试过它的几个人，但是一个人（使用相同版本的excel - 2013）会出现超时错误。我允许Excel在设置中连接到互联网，并启用了宏。任何建议都表示赞赏。

谢谢！

Set objHTTP = CreateObject("Msxml2.ServerXMLHTTP.6.0")
Dim result As String
URL = "http://www.google.com"
With objHTTP
    .Open "GET", URL, False
    .SetRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
    .send ("")
End With

Answer 1

更改对象类型：设置objHTTP = CreateObject（“Microsoft.XMLHTTP”） 希望这有帮助！