WebDriverVBA

WebDriverVBA「Edge/Chromeでボタンクリックをする/class要素」【ExcelVBA】

2022年、Internet Explorerのサポート終了→SeleniumBasicに置き換えた開発を進めましたが、
SeleniumBasicのインストールが厳しい環境のユーザー様も多く存在しました。
その為、自前でWebDriverを動かす「WebDriverVBA」の開発を進めました。

ある程度動くよう(SeleniumBasicに比べたらまだまだですが)になったため、
同じようにお困りのユーザーの方に、ソフトライセンス販売の形で提供致します。
WebDriverVBAを使用した際のサンプルコードを以下に記載します。

Edge/Chromeでボタンをクリックする

Excel VBAマクロでEdge/Chromeを自動操作する際のクリック処理です。
クリックの基本です。

 

'■class要素をクリック
Call driver.Click("★★★", vcClassName, ★)

 

class要素をクリックするサンプル(VBACreate)

name要素はXPathやidと異なり、サイト内で重複することがあります。そのため、要素を指定する際には、
添え字(何番目の要素か)を指定する必要があります。

 

'■当サイトヘッダーの「VBA開発代行」
 <div class="item-label">VBA代行開発</div>
 

Public Sub test_click_class()

    Dim driver As webDriverVBA
    Set driver = New webDriverVBA

    Dim val As Variant

    '■ドライバーを起動
    Call driver.Start(vcChrome)

    '■目的のサイトへ移動する
    Call driver.Navigate("https://vba-create.jp/")

    '■ウインドウを最大化
    Call driver.MaximizeWindow

    '■読み込みを待つ
    Call driver.Wait(2000)

    '■「VBA開発代行」をクリック
    Call driver.Click("item-label", vcClassName, 1)

End Sub

注意
添え字は必ず1スタートです。html内で指定したclassが1番目の場合、添え字で1を指定します。
  • WebDriverVBAまとめページ(ページが増えれば公開します。)

WebDriverVBAについて

Excel VBAでSeleniumBasicを使わずにEdge/Chromeでスクレイピングするためのツールです。
SeleniumBasicがインストールできない環境の方にもスクレイピングをお助けします。

料金などについてはこちらからお問い合わせくださいませ。

 

 

コメント

タイトルとURLをコピーしました