2013-10-07 71 views
2

我是vba中的新成員。我希望你的觀點能夠通過使用條件來獲得下一個td元素的價值。可以說,如果前一個td的元素是真的,那麼我們將採取下一個td鏈接來下載文件。如何從HTML中的相同tr獲取下一個td元素,vba

在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」。如果有任何建議,請讓我知道傢伙..

+0

使用nextSibling屬性獲取列表中的下一項。 – Santosh

+1

謝謝santosh ... :) – user2851376

+0

不客氣:) – Santosh

回答

0

由於桑托斯在評論中說:

使用nextSibling屬性來獲取列表中的下一個項目。