如何从HTML，vba中的相同tr获取下一个td元素

Question

我是vba的新手。我希望你的意见如何通过使用条件从下一个td元素获取值。假设，如果前一个td中的元素为真，那么我们将使用下一个td链接来下载该文件。

在html中，这是一个tr和3 td，如下所示：

表1.存货|链接download.xls |链接download.zip

---

这是我的编码：

Dim tr As MSHTML.IHTMLElementCollection, Dim td As MSHTML.IHTMLElementCollection

Dim tdobj As MSHTML.HTMLGenericElement
Dim trobj As MSHTML.HTMLGenericElement  
Set tr = htmlDoc.getElementsByTagName("tr")
For Each trobj In tr
    Set td = trobj.getElementsByTagName("td")
    For Each tdobj In td
        If (Trim(tdobj.innerText) Like "TABLE 1. INVENTORIES*") Then
            "take link download .xls here"
        End If
    Next
Next

有可能得到吗？我得到了表库存，但我坚持如何获得“链接download.xls”。如果有任何建议，请让我知道..

Answer 1

正如桑托什在评论中所说：

  

使用nextSibling属性获取列表中的下一个项目。