WebBrowserで複数フレームのドキュメントを扱うには？ (ID:90747)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 いつもお世話になります。 以前こちらでの質問で、WebBrowserコントロールでリッチテキストボックス におけるSelTextと同じ結果を得るための方法として、いろいろアドバイス を頂いた内容を私なりにまとめて、下記のコードでその目的が達成できるこ とを理解いたしました。 さてここで質問なのですが、フレームを使用していないドキュメントの場合 は、下記のコードで問題ないことはわかりましたが、フレームを使用している ドキュメントの場合には、例えば、マウスのクリックでフレームを特定する ような処理を加えないといけないと思うのですが、その方法がいまいちよく 分かりません。 こちらでの検索で内容的に近そうなものを読んでいましたら、 WebBrowser1.Document.frames でフレームの数を求めて、特定のフレームの印刷を行うというような方法が 書かれていましたが、その「特定のフレーム」というのを特定するまでの 手続きの仕方がわかりませんでした。 複数フレームのうち一つを特定して、その特定したフレームに対してなんら かの処理を行うためには、どのような方法があるのでしょうか。 Private Body As MSHTML.HTMLBody Private WithEvents Doc As MSHTML.HTMLDocument Private Rng As MSHTML.IHTMLTxtRange Private selRng As IHTMLTxtRange Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant) Set Doc = WebBrowser1.Document Set Body = WebBrowser1.Document.Body Set Rng = Body.createTextRange End Sub Private Function Doc_onclick() As Boolean Set selRng = Doc.selection.createRange 〜処理Ａ〜 Set selRng = Nothing Doc_onclick = True End Function