-2147467259 エラーを特定できません。
VBAで3つのパターンを作ったのですが
-------------------------
Sub test1_wiki()
Dim objMSXML2 As Object
Set objMSXML2 = CreateObject("MSXML2.XMLHTTP")
objMSXML2.Open "GET", "https://ja.wikipedia.org/wiki/%E3%83%A1%E3%82%A4%E3%83%B3%E3%83%9A%E3%83%BC%E3%82%B8", False
objMSXML2.Send
End Sub
-------------------------
Sub test2_100円ローソン()
Dim objMSXML2 As Object
Set objMSXML2 = CreateObject("MSXML2.XMLHTTP")
objMSXML2.Open "GET", "http://ja.wikipedia.org/wiki/%EF%BC%91%EF%BC%90%EF%BC%90%E5%86%86%E3%83%AD%E3%83%BC%E3%82%BD%E3%83%B3", False
objMSXML2.Send
End Sub
-------------------------
Sub test3_ローソン()
Dim objMSXML2 As Object
Set objMSXML2 = CreateObject("MSXML2.XMLHTTP")
objMSXML2.Open "GET", "https://ja.wikipedia.org/wiki/%E3%83%AD%E3%83%BC%E3%82%BD%E3%83%B3", False
objMSXML2.Send
End Sub
-------------------------
2のtest2_100円ローソンだけが
objMSXML2.Sendで
実行時エラー -2147467259(80004005)エラーを特定できません。
となります。
wikiのページが存在しないからでしょうか?
であれば、そのソースが取得できても良いと思うのですが
なぜVBAでエラーになるのでしょうか?