WebDriverVBA「Edge/ChromeでアラートのOK/キャンセルボタンを押す」【ExcelVBA】

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

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

Edge/ChromeでアラートのOK/キャンセルボタンを押すサンプルコード

サイトによっては、アラートが表示されてスクレイピングの動きを止めることがあります。
WebDriverVBAでは、アラートを操作する関数を用意しています。

サンプルでは、アラートを表示する関数を使用しています。

Public Sub test_accept_alert()

    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)

    '■アラートを表示
    Call driver.DisplayAlert("webdriverVBA")

    '■待機
    Call driver.Wait(2000)

    '■アラートのＯＫを押下
    Call driver.SendOkAlert

    '■アラートを表示
    Call driver.DisplayAlertComfirm("webdriverVBA")

    '■待機
    Call driver.Wait(2000)

    '■アラートのキャンセルを押下
    Call driver.SendCancelAlert

End Sub

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

WebDriverVBAについて

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

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