VBAのIE制御

Function tableValue(objIE As InternetExplorer, _
                    tagStr As String, _
                    row As Integer, _
                    col As Integer) As String
                    
    Dim objtag As Object

    For Each objtag In objIE.document.getElementsByTagName("table")

        With objtag
        
            If InStr(.outerHTML, tagStr) > 0 Then

                tableValue = .Rows(row).Cells(col).innerText
        Exit For
            
            End If
            
        End With

    Next

End Function

※ドラッグ(スワイプ)すると全体を確認できます。

こちらは、全て必須項目となります。
「objIE」はオブジェクトを入力します。
「tagStr」には、tableタグに含まれる一意のキーワード文字列を入力します。「一意のキーワード」とはそこでしか使われていない文字列のことです。
探すポイントとしては、まずid属性が設定されているか確認してください。id属性は一意の属性ですので、こちらが設定されていれば簡単に取得できます。
d属性がない場合は、name属性・class属性で一意のキーワードがないか確認していきます。
「row」には、tableの抽出したい行番号（0から）を入力します。
「col」には、tableの抽出したい列番号（0から）を入力します。

↑VBAのIE操作で分からない事があればこちらの掲示板よりご質問ください。

↑こちらはVBAをマスターできるよう初心者向けのエクセルVBA入門コンテンツになります。

目次