三流君 ken3のmemo置き場

メモ置き場、保管庫として利用。まとまっていませんがヨロシク



03/28 _NewWindow2 で 新規ウインドウ捕まえる VBA IE操作 単勝表取込み

動画で三流解説

動画の簡単な説明

新しいウインドウが起動したので、
Me.WebBrowser3
を新たに作って、捕まえてみます・・・

だと、面白くないので(※面白くなくても簡単にできれば、そっちの解説が聞きたいよ)
使っていない、上部の Me.WebBrowser1 を 代入してみます。

Private Sub WebBrowser2_NewWindow2(ppDisp As Object, Cancel As Boolean) Debug.Print "WebBrowser2_NewWindow2 に 入りました。" Set ppDisp = Me.WebBrowser1 '新しいウインドウはWebBrowser1を代入
End Sub

↑単純に、WebBrowser2_NewWindow2 の イベントで、
Set ppDisp = Me.WebBrowser1
と新しいウインドウはWebBrowser1ですよ・・って感じにしました。

動画解説やテスト結果


動画元: 03/28 _NewWindow2 で 新規ウインドウ捕まえる VBA IE操作 単勝表取込み - YouTube

動画区分・リンク