タイトル : Re: 起動中のIEへパラメータを渡したい 投稿日 : 2008/03/07(Fri) 17:36 投稿者 : これ
> IEが起動している場合は、起動中のIEへURLを渡してリロードさせたいのです。 > (起動してない場合は起動させてURLを渡す・・・ですがこちらはわかります) こんな感じですか? ' Microsoft Shell Contorols And Automationを参照設定に追加 ' 起動中のIEは1個限定 Dim sh As Shell32.Shell ' Shell Object Dim shws As Object ' ShellWindows Collection Dim w As Object ' Window App Dim url As String ' Navigate URL Set sh = New Shell32.Shell Set shws = sh.Application.Windows() url = "hhttp://www.google.co.jp/" ' 掲示板投稿対策でh全角にしてます For Each w In shws If Trim(w.Name) = "Microsoft Internet Explorer" Then ' ハンドルとURL表示 'Debug.Print "&H" & Hex(w.hWnd), w.LocationURL ' 指定のURLに移動 w.Navigate url End If Next |