Edgeで画面をモバイルサイズ(mobileEmulation)で起動する【Selenium】【ExcelVBA】

Edgeで画面サイズをPC標準のサイズから、モバイルサイズにすることが可能です。
SetCapabilityでmobileEmulationを変更する形です。

画面をモバイルサイズ(mobileEmulation)で起動するサンプルコード

Dim driver As New WebDriver
Public Sub sample()
    
    Dim str As String
    
    '■iPhoneXサイズに偽装
    str = "user-agent=Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:92.0) Gecko/20100101 Firefox/92.0"
    driver.SetCapability "ms:edgeOptions", "{""mobileEmulation"":{""deviceName"":""iPhone X""}}"
    
    '■ブラウザ起動
    driver.Start "edge"
    driver.Get "https://vba-create.jp/"
     
End Sub

注意点

• 特にありません。

関連記事

• Edgeをシークレットモードで起動する【Selenium】
• Edgeで自動テストソフトウェアによって制御されていますを非表示にする【Selenium】
• Edgeを非表示で操作する【headless】【Selenium】
• Edgeで起動しているブラウザを操作する【Selenium】

SeleniumBasicについて

Internet Explorer11 のサポート期限が2022年6月までと、スクレイピング自体入れ替えていく必要があります。
今一番スムーズなのはSeleniumBasicを使用したスクレイピングと考えます。

但し、VBAでのネット記事は少なく困っている方も多いと思います。
弊社で代行開発も可能ですので、お気軽にご用命ください。