VBAでIE自動操作する際、要素数を数えたい場合があります。
ページの要素が可変だった場合に、処理を分岐させたい場合などに使います。
Webページの指定要素数を数えるサンプルコード
Public Sub test() Dim objIE As Object '■IE起動→該当ページへ遷移 Set objIE = CreateObject("InternetExplorer.Application") objIE.Visible = True objIE.navigate "https://vba-create.jp/" Call Call_IE_WaitTime Debug.Print objIE.document.getElementsByTagName("a").Length '1からではなく0からカウントします。 '10の数値の場合0~9の10個の要素が存在します。 End Sub
注意点
- Option Base1に限らず、スタートは1ではなく0です。
関連記事
その他
Internet Explorerを使用して、Webスクレイピングは敷居が高い風に捉えられますが、
上記のように、パーツ化して組み合わせ処理するだけです。
Web上のデータを触りたい要望は会社様でも個人様でも多いと思います。
VBA IE操作を覚えて効率化しませんか?
作成が大変であれば弊社で代行開発も可能です。お気軽にお問い合わせください。
コメント