VBA 起動中のInternetExplorerを操作する

VBA 起動中のInternetExplorerを操作する

[IE]テンプレート:Category VBA

起動中のIEのツールバー、メニューバーを表示する

• 参考
  • http://www.ken3.org/vba/backno/vba156.html

例

Dim shl    As Object
Dim w      As Object
Dim ie     As Object  'InternetExplorer

Set shl = CreateObject("Shell.Application")

For Each w In shl.Windows
    If TypeName(w.document) = "HTMLDocument" Then
        Set ie = w
        ie.Toolbar = 1
        ie.MenuBar = True
    End If
Next