- 日時: 2013/02/12 19:43
- 名前: 花ちゃん
 
   -  ***********************************************************************************
  * カテゴリー:[インターネット][][]                                        *  * キーワード:閉じる,インターネットエクスプローラ,,,,                             *  ***********************************************************************************
  ----------------------------------------------------------------- 投稿時間:2002/10/08(Tue) 11:25 投稿者名:K.J.K. タイトル:IEを終了させる ----------------------------------------------------------------- IEは、Explorerのプロセス内で動くので、その方法は使えないでしょう。
  ShDocVw.dllを参照設定して、こんな感じで。
      Dim objWindows As ShellWindows     Dim objIE As InternetExplorer     Dim lngLoop As Long
      Set objWindows = New ShellWindows     For lngLoop = objWindows.Count - 1& To 0& Step -1&         Set objIE = objWindows.Item(lngLoop)         If ("HTMLDocument" = TypeName(objIE.Document)) Then             Call objIE.Quit         End If         Set objIE = Nothing     Next     Set objWindows = Nothing
  
 
  |