タイトル : Re^5: withEventsで生成したInternetExplorerが捕捉できない 投稿日 : 2015/04/12(Sun) 03:28 投稿者 : 魔界の仮面弁士
> For Each objIE In objShellWindows > If InStr(objIE.LocationURL, strURL) <> 0 Then > Call ShowWindow(objIE.hWnd, SW_MAXIMIZE) > goto Exit_Sub > End If > Next > Set objIE = OpenIE(strURL) このコードは、 ・LocationURL が一致するものがあれば、それを ShowWindow で最大化表示する ・見つからなければ、OpenIE を呼び出して、新しい IE を最小化状態で起動する。 というものですよね。 新しいサイトを表示するためには、Command1 ボタンを 2 回押すか、もしくは Command1 ボタンを押した後でタスクバーのボタンを押す必要があるので 2 度手間な気がするのですが、それ自体は意図した動作なのでしょうか? しかも、ShowWindow しているだけでアクティブ化の制御は行っていないので、 複数の IE がいずれも SW_MAXIMIZE 状態になっていたとすると、 Command1 を再度押しても、ウィンドウは非アクティブのままで前面表示されないでしょうし…。 |