VBA開発

VBAでIE操作「Internet Explorerをシアターモードで表示する(F11と同動作)」

Internet Explorerをシアターモードで表示する

Excel VBAマクロでIEを自動操作する際、画面をシアターモードで表示させることも可能です。
シアターモードとはIE起動後、手動で F11 キーを押した時の全画面表示と同様です。

似たような機能でフルスクリーン表示もあります。

■動作
・ウィンドウを最大化
・アドレスバーを表示(フルスクリーンの場合非表示)
・メニューバーを表示(フルスクリーンの場合非表示)
・ツールバーを非表示
・ステータスバーを非表示

IEをシアターモードで表示する、元に戻すサンプルコード

Sub sample_IE_TheaterMode()
    Dim objIE As InternetExplorer
    
    '■IEを起動
    Set objIE = CreateObject(”InternetExplorer.Application”)
    objIE.Visible = True
 
    '■指定したURLに飛び、Webサイトの表示を待つ
    objIE.navigate ”https://vba-create.jp/”
    Call Call_IE_WaitTime
    
    '■IEの画面サイズをシアターモード(全画面表示)する
    objIE.TheaterMode = True

    '■IEの画面サイズを、通常画面表示する
    objIE.TheaterMode = False

End Sub

注意点

 

その他

Internet Explorerを使用して、Webスクレイピングは敷居が高い風に捉えられますが、
上記のように、パーツ化して組み合わせ処理するだけです。

Web上のデータを触りたい要望は会社様でも個人様でも多いと思います。
VBA IE操作を覚えて効率化しませんか?
作成が大変であれば弊社で代行開発も可能です。お気軽にお問い合わせください。

 

コメント

タイトルとURLをコピーしました