3

私はvbaが初めてです。条件を使用して次の td 要素から値を取得する方法について意見を求めています。たとえば、前の td の要素が true の場合、次の td リンクを使用してファイルをダウンロードします。

html では、これは次のように 1 つの tr と 3 つの td にあります。

表 1. インベントリ | リンク ダウンロード.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

得ることは可能ですか?テーブルのインベントリを取得しましたが、「Link download.xls」を取得する方法に行き詰まりました。何か提案があれば、私に知らせてください..

4

1 に答える 1

0

サントッシュがコメントで言ったように:

リスト内の次の項目を取得するには、nextSibling プロパティを使用します。

于 2015-08-08T02:20:07.637 に答える