excel VBA 2013中的运行时自动化未指定错误

我试图在Excel 2013中运行一段VBA代码来访问我们的Intranet站点的一些数据，我得到一个运行时错误2147467259（80004005） – 自动化错误未指定的错误。

Sub AccessWar() Dim oIE As InternetExplorer Dim oHTML As HTMLDocument Set oIE = New InternetExplorer oIE.Navigate ("http://iscls3apps/WAR40/aspx/WAR40AllReports.aspx") oHTML = oIE.document End Sub 

我是新来的优秀的VBA，并没有太多的想法。 任何指针都会有帮助

Answer 1

我也试图使用IE浏览器，但似乎运行并不在乎是否在IE浏览器加载页面是否完成！

所以我做了一个小小的例程，导航和等待，只是增加

 Application.Wait(Now + TimeValue("0:00:05")) 

在每一个导航之后……没有超高效但VBA不是用来parsingnetworking上的信息的，如果你愿意的话可以使用更多的合适的语言！ ;）