WebDriverVBA「Edge/Chromeでブラウザのサイズを変更する」【ExcelVBA】

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

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

Chrome/Edgeブラウザのサイズを変更する

Excel VBAマクロでWebDriverVBAを使用して、自動操作する際、
画面サイズを最大化、最小化が可能です。
通常サイズだと要素が見つけられない場合があり、最大化推奨です。

ブラウザを規定のサイズへ変更するサンプルコード

Public Sub test_VBACreate()

    Dim driver As webDriverVBA
    Set driver = New webDriverVBA

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

    '■ヤフーのサイトへ遷移
    Call driver.Navigate("https://vba-create.jp/")

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

    '■検索ボックスに検索ワードを入力
    Call driver.SetText("WebDriverVBA", "//*[@id=""search-4""]/form/input", vcXpath)

    '■検索ボタンをクリック
    Call driver.Click("//*[@id=""search-4""]/form/button", vcXpath)

    '■１秒待つ
    Call driver.Wait(1000)
    '■ウインドウの最小化
    Call driver.MinimizeWindow

    '■ウインドウのフルスクリーン
    Call driver.FullscreenWindow

End Sub

ブラウザを指定のサイズへ変更するサンプルコード

    Call driver.SetWindowSize(1980, 1040)

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

WebDriverVBAについて

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

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