インターネットで調べてVBSで下のようなものを作ってみました。

質問

インターネットで調べてVBSで下のようなものを作ってみました。
やりたいことは、IEを起動して複数のサイトを複数のタブで表示
したいのですが、サイトの種類分IEも起動してしまいます。
考えているようなことはできないのでしょうか。

＝＝＝＝＝＝＝＝ここから下です＝＝＝＝＝＝＝＝

Option Explicit

Dim objIE
Dim objShell

'Shell.Application
Set objShell = CreateObject("Shell.Application")
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Visible = True 'IEウィンドウを表示
objIE.Navigate2 "http://www.okwave.jp/"
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Visible = True 'IEウィンドウを表示
objIE.Navigate2 "http://www.google.co.jp/"
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Visible = True 'IEウィンドウを表示
objIE.Navigate2 "http://www.yahoo.co.jp/"

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

よろしくお願いいたします。

回答No.1

DOUGLAS_ · ベストアンサー

こんな感じでいかがでしょうか？

Set objIE = CreateObject("InternetExplorer.Application")
With objIE
.Visible = True
.Navigate2 "http://www.okwave.jp/"
.Navigate2 "http://www.google.co.jp/", &H800
.Navigate2 "http://www.yahoo.co.jp/", &H800
End With

参考ＵＲＬ）http://www.google.co.jp/search?q=Navigate2+%26H800

お礼

お陰様で目的の物が出来あがりました。
参考URLまで付けていただき
本当に助かりました。
ありがとうございます！！