|
こんにちは。再びの質問で申し訳ありませんが、ご教授願います。
現在、前回ご教授頂いたやり方で試しIEを最前面へ開くようには
なったのですが、IEが新しい別ウィンドウ(プロセス)で開いていたのが
同時に複数のIEを起動して利用している場合に実行前に開いていたIEを
使いウィンドウを開くようになってしまいました。
いろいろ調べてみたのですが、私の力不足か(T_T)新たに質問させて
頂くことに至りました。
以下に今わかっている2通りのやり方を記載しています。
この2つの機能を一緒に含める方法はありませんでしょうか?
どうかお力をお貸しください!
よろしくお願い致します。m(__)m
================= IEを別ウィンドウで開く方法 ==================
Private Sub ボタン_Click()
Dim ObjIE As Object
Set ObjIE = CreateObject("InternetExplorer.Application")
ObjIE.Navigate "http://~"
ObjIE.Visible = True
Set ObjIE = Nothing
End Sub
===============================================================
================= IEを最前面で開く方法 ==================
Private Sub ボタン_Click()
Dim ObjIE As Object
Set ObjIE = CreateObject("Wscript.Shell")
ObjIE.Run "http://~"
Set ObjIE = Nothing
End Sub
=========================================================
PS.初心者ゆえに、この場合新たな質問として掲示し直した方がよかったのか?
わかりませんでしたので、とりあえず余分なレスを増やさないためにも
こちらに追記しました。
もし別物であつかった方が良かったり、ここに追記することに間違いが
ありましたらすみませんm(__)m
|
|