VBA 起動中のInternetExplorerを操作するの変更点

• 追加された行はこのように表示されます。
• 削除された行はこのように表示されます。

!!!VBA 起動中のInternetExplorerを操作する
[VBA][IE6]
[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