Open a Txt file

I want to open a txt file and read it's content to the debug window.
DzAsked:
Who is Participating?
 
caraf_gConnect With a Mentor Commented:
Easy....

Dim intFile as Integer
Dim strLineRead As string
intFile = FreeFile
Open X:\YourPath\YourTextFile.txt for input as #intFile
Do while not eof(intfile)
    line input #intfile, strlineread
    debug.print strlineread
loop
close #intfile
0
 
DzAuthor Commented:
Thank you for the quick response
0
All Courses

From novice to tech pro — start learning today.