03/09 WebBrowser1.Document.all(n).tagname = "HTML" デバッグ

.TagName で タグを判断して、HTMLのソースを取り出してみた。。。

---- Dim n As Integer For n = 0 To 99 'タグがHTMLかチェック If Me.WebBrowser1.Document.all(n).tagname = "HTML" Then Me.txtHTML_SRC.Text = Me.WebBrowser1.Document.all(n).OuterHTML Exit For 'ループを抜ける End If Next n
----

←の詳細は http://ie.vba-ken3.jp/sample/001/2009-03-07.html を見てください。

Category:

Science & Technology

Tags:

• 三流君
• デバッグ
• .tagname
• VBA
• WebBrowser