1

我正在尝试遍历页面上的所有表格元素,但出现上述错误。这是我的代码:

Dim ie As InternetExplorer
Dim ieDOC As HTMLDocument
Dim tableElements As HTMLElementCollection
Dim tableElement As HTMLTable

Set ie = New InternetExplorer
ie.Visible = True
eURL = "url_of_site_to_visit"
ie.navigate ieURL
Do While ie.Busy Or ie.readyState <> 4
    DoEvents
Loop
Set ieDOC = ie.Document
Set tableElements = ieDoc.getElementsByTagName("table")

出于某种原因,我在Set tableElements = ieDoc.getElementsByTagName("table")代码行上收到“类型不匹配”。

另外,调试时,它告诉我tableElements = Nothing

我添加了对“Microsoft HTML 对象库”和“Microsoft Internet 控件”的引用。

任何关于导致错误的原因或如何修复错误的方向都将不胜感激。

4

1 回答 1

1

认为应该是IHTMLElementCollection(注意I开头的),因为这是getElementsByTagName返回的对象类型

于 2012-11-19T01:22:02.667 回答