open HTML document as text file

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Mark - 15 May 2008 15:32 GMT

Hello, I have code in my program that can open HTML text files and
search them for hrefs. There are also HTML Documents that I need to
search. If selected they open in IE, if I right click and say open
with, then they open as a text file. Is there a way to do this in my
code?

Reply to this Message

Gary''s Student - 15 May 2008 16:22 GMT

This works:

Sub Macro1()
Dim s As String
Open "C:\x.html" For Input As #1 Len = 1
i = 1
Do Until EOF(1)
s = Input(1, #1)
Cells(i, "A").Value = s
i = i + 1
Loop
Close #1
End Sub

You may need to "re-package" the characters.

Signature

Gary''s Student - gsnu200786

> Hello, I have code in my program that can open HTML text files and
> search them for hrefs. There are also HTML Documents that I need to
> search. If selected they open in IE, if I right click and say open
> with, then they open as a text file. Is there a way to do this in my
> code?

Reply to this Message