View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.misc
Wendy Wendy is offline
external usenet poster
 
Posts: 35
Default How do I ignore blank lines

Hi

I am reading data in from several text files and turning it into one text
file, sometimes I get blank lines inserted into my output file. My method
doesn't work. Any ideas please?

Thanks

Wendy

Do While Not EOF(1) ' Loop until end of file.
Line Input #1, textline ' Read line into variable.
If textline = "" End If
Else
If Left(fname, 5) = "APSNL" Then
Print #2, textline ' Print to the
Scunny file
Else
Print #3, textline ' Print to the
Hull file
End If

Loop
Close #1 ' Close Input file.
Kill pafname 'deletes Input file