Using FileOpen

[Tippy]

Using FileOpen

I am trying to
1. Get the file path from an excel sheet.
2. Open the text file for input.

Dim strFILENAME As String
strFILENAME = Sheet1.Range("E1").Value
FileOpen(1, "strFILENAME", OpenMode.Input)
...
blah = LineInput(1)


When compiling, I seem to have a syntax error on FileOpen an
LineInput. Any ideas of why this might be a problem?

Also what is the difference between using FileOpen and
Open strFILENAME For Input As #1 ? and FileClose and Close #1? If I d
the latter choices for both questions, am I able to use LineInput?

Thanks :

 

[Chip Pearson]

Tippy,

Try something like the following:

Dim S As String
Dim FName As String
Dim FNum As Integer

FName = "C:\Temp\Test.txt"
FNum = FreeFile
Open FName For Input Access Read As #FNum
Do Until EOF(FNum)
Line Input #FNum, S
Debug.Print S
Loop
Close #FNum

--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com