使用VBA代码从tr获取所有td

Question

我有一个tr，它是一个对象，并且有td。我想在另一个对象变量tblTD中获取所有td。为此，我使用了Set tblTD = tr.getelementsbytagname("td")。但是，当我检查tblTD的长度时，它显示为0.有人可以建议如何做到这一点。请参考附件中的图片。谢谢！

Answer 1

如果您使用tr函数设置getElementsByTagName，那么您需要遍历每个tr对象以获取子td对象（或者您只能引用一个对象）：

Dim td As MSHTML.IHTMLElementCollection
Dim tr As MSHTML.IHTMLElementCollection
Dim trObj as MSHTML.HTMLGenericElement
Dim tdObj as MSHTML.HTMLGenericElement

Set tr = HTMLDoc.getElementsByTagName("tr")
For Each trObj In tr
    Set td = trObj.getElementsByTagName("td")
    For Each tdObj in td
        'do something with each td object'
    Next
Next