reading text file 1

[axism]

Hi, I have a text file with the following information:

name
email
department
phone number

on each line. I would like to know how you read the text file using vba code line by line. Thanks

 

[kav123]

You can use the Scripting.FilesystemObject in VB. Go to Tools-Reference and select Microsoft Scripting runtime. Create an object for this. This object has methods and properties to read/write files.

 

[earthandfire]

Using built-in VBA commands

Dim f As Long
Dim fn As String
Dim txt As String

fn = "c:\MyTextFile.Txt"
f = FreeFile
Open fn For Input Access Read As f
Do Until EOF(f)
  Line Input #f, txt
  'Do something with txt
Loop
Close f

Hope this helps.

 

[axism]

thanks for answering. it works out great. now that i can read my file. The only question left is that how many files can u open at a time for writing? before, i was only writing to 1 file and reading off that 1 file. i am trying to write to 2 files. it says my file already open. it's it limited to only openning 1 file at a time?

 

[PHV]

Have a look at the FreeFile function.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886