Personal computing discussed
Moderators: renee, SecretSquirrel, just brew it!
Dim doc As MSHTML.HTMLDocument ' or As Object if no ref to HTML Object Library
Set doc = WebBrowser1.Document
Dim f As Integer
f = FreeFile
TextBox1.Text = doc.documentElement.innerHTML 'if you want to display it
Open "c:\source.html" For Output As #f
Print #f, doc.documentElement.innerHTML
Close #f