WebDriverVBA「Edge/Chromeでブラウザを指定の位置へ移動する」【ExcelVBA】

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

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

ブラウザを指定の位置へ移動するサンプルコード

WebDriverVBAでは、ブラウザを任意のサイズに変更したり指定の位置へ移動させることができます。
複数のブラウザを立ち上げて、左右に並べることもできます。

Public Sub test_position()

    Dim driver_1 As webDriverVBA
    Dim driver_2 As webDriverVBA

    Set driver_1 = New webDriverVBA
    Set driver_2 = New webDriverVBA

    '■ドライバーを起動
    Call driver_1.Start(vcchrome)
    Call driver_2.Start(vcchrome)

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

   '■ウインドウを指定サイズへ変更
    Call driver_1.SetWindowSize(800, 1000)
    Call driver_2.SetWindowSize(800, 1000)

    '■ウインドウを指定位置へ移動
    Call driver_1.SetWindowPosition(0, 0)
    Call driver_2.SetWindowPosition(900, 0)

End Sub

参考

• Driver起動・指定URLへ遷移
• ブラウザを任意のサイズに変更
• ブラウザの読み込み待ち

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

WebDriverVBAについて

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

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