VBAでIE操作「IEウィンドウの各種バーの表示/非表示」

Internet Explorerウィンドウの各種バーの表示/非表示

Excel VBAマクロでIEの自動制御では、下記のようなIEウインドウの各種バーの設定変更も可能です。

• ツールバーの表示/非表示
• アドレスバーの表示/非表示
• メニューバーの表示/非表示
• ステータスバーの表示/非表示

それぞれ専用の属性が準備されていますので、True/Falseの値のみで簡単に設定可能です。

IEウィンドウの各種バーの表示/非表示サンプルコード

'■InternetExplorerウインドウの各種バーの表示/非表示
Sub sample_IE_bar_Showt()
    Dim objIE As InternetExplorer
 
    '■IEを起動
    Set objIE = CreateObject("InternetExplorer.Application")
    objIE.Visible = True
  
    '■該当ページへ遷移
    objIE.navigate "https://vba-create.jp"
    Call Call_IE_WaitTime
    
    '■各種バー非表示
    objIE.Toolbar = False    'ツールバー
    objIE.AddressBar = False 'アドレスバー
    objIE.MenuBar = False    'メニューバー
    objIE.StatusBar = False  'ステータスバー
  
    '■各種バー表示
    objIE.Toolbar = True    'ツールバー
    objIE.AddressBar = True 'アドレスバー
    objIE.MenuBar = True    'メニューバー
    objIE.StatusBar = True  'ステータスバー
  
End Sub

注意点

• こちらのコードだけでは動作しません。
  下記の読み込み待ちのパーツ化したコードが必要です。
  VBAでIE操作「ブラウザの読込待ち」処理をパーツ化する【エクセルマクロ】
• ToolBar属性をFalseにすることで、AddressBarやMenuBarも同様にFalse(非表示)状態となります。
  明示的にAddressBar=Trueと設定しても、AddressBarは表示しません。