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

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

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

Edge/Chromeでボタンをクリックする
name要素をクリックするサンプル(VBACreate)
参考
WebDriverVBAについて

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

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

 

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

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

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

 

'■KyoteiVBAお問い合わせページのチェックボックス
　<input type="checkbox" name="checkbox-672[]" value="上記、事前設定は終えてますか？">


Public Sub test_click_name()

    Dim driver As webDriverVBA
    Set driver = New webDriverVBA

    Dim val As Variant

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

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

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

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

    '■「上記、事前設定は終えてますか？」のチェックボックスをクリック
    Call driver.Click("checkbox-672[]", vcName, 1)

End Sub

注意
添え字は必ず1スタートです。html内で指定したnameが1番目の場合、添え字で1を指定します。

参考

WebDriverVBAまとめページ(ページが増えれば公開します。)

WebDriverVBAについて

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

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