2

実行時に Internet Explorer オブジェクトを作成したかったのですが、現在のセッションで既に開かれているブラウザー オブジェクト (IE) を参照または検索する必要があります。

以下のコードを Start up として使用すると、新しい Internet Explorer オブジェクトが作成され、ブラウザが開き、同じものが参照されます。しかし、セッションで開いている既存のブラウザを識別し、新しいブラウザ ウィンドウを開かないようにする Internet Explorer オブジェクトを作成する方法。

Set IE = CreateObject("InternetExplorer.Application")

誰でもこれについて私を助けることができますか?ありがとうございました。

4

1 に答える 1

5

Shell.Applicationこのオブジェクトを使用して、既に実行中の IE インスタンスを見つけることができます。

Set sh = CreateObject("Shell.Application")
For Each wnd In sh.Windows
  If InStr(1, wnd.FullName, "iexplore.exe", vbTextCompare) > 0 Then
    Set ie = wnd
    Exit For
  End If
Next

上記は、最初に見つかったインスタンスにアタッチされます。を削除するExit Forと、代わりに最後に見つかったインスタンスにアタッチされます。

于 2013-07-29T11:32:24.510 に答える