SeleniumBasicでブラウザの最大化（サイズや位置の指定も）

概要

AccessのVBA ⇒ SeleniumBasic ⇒ Chromeの処理自動化
をやってる。

SeleniumBasic経由でChrome起動するとウィンドウが最大化しない。
最大化で処理結果確認したい場面になったら、毎回手動で最大化してる。
それ面倒なので、最大化も自動でやらせたい。

ついでにウィンドウサイズや位置の指定方法についても知っておく。

やり方

動作確認サンプル

Option Compare Database
Option Explicit


'関数終了時にChromeが終了しないように、関数外で変数定義。
Dim WEB_DRIVER_ As Selenium.WebDriver


Private Function Tester()
    
    Set WEB_DRIVER_ = New Selenium.WebDriver
    
    'Chromeで動作確認
    Call WEB_DRIVER_.Start("chrome")
    
    '動作確認用に3秒待つ
    Call WEB_DRIVER_.Wait(1000 * 3)
    
    'ウィンドウサイズ変更
    Call WEB_DRIVER_.Window.SetSize(100, 100)
    
    '動作確認用に3秒待つ
    Call WEB_DRIVER_.Wait(1000 * 3)
    
    'ウィンドウ位置変更
    Call WEB_DRIVER_.Window.SetPosition(100, 100)
    
    '動作確認用に3秒待つ
    Call WEB_DRIVER_.Wait(1000 * 3)
    
    'ウィンドウ最大化
    Call WEB_DRIVER_.Window.Maximize
    
    '動作確認用に3秒待つ
    Call WEB_DRIVER_.Wait(1000 * 3)
    
    'フルスクリーン
    'ここでなぜか例外
    Call WEB_DRIVER_.Window.FullScreen

End Function

未解決の問題

Window.FullScreen で下記になる。

Window.Maximize でやりたいことできたし、フルスクリーンでの動作テストってほとんどやらないから一旦放置。

参考サイトさん

バージョン

Windows 10 Pro 21H2 OSビルド 19045.2364
Microsoft Access for Microsoft 365 MSO (バージョン 2211 ビルド 16.0.15831.20098) 32 ビット
SeleniumBasic 2.0.9.0
Google Chrome 108.0.5359.125（Official Build） （64 ビット）

TODO:フルスクリーン時の例外解消。（Chromeのセキュリティ設定？）