Does anyone have any comma sense out there?

[joltremari]

I'm not exactly sure if I'm clear on what your saying, but, if you've been viewing this file in excel you should try viewing it in notepad then you'll see where those commas followed by one entry at the end. Lines 3, 4, & 5 are like that. Because this is saved as a .csv file it defaults to excel, so therefore if you type one value in the last column all the columns before it will still get seperated by commas even though they have no values. (lines 3,4,&5 in your file, also lines 1 & 2.)

Also instead of getting each line by a while not eof loop you should maybe try loading each line into an array, like so:

Dim MyLine() As String
 
Open [I]filename[/I] for Input As #1
    MyString = Split(Input(LOF(1), 1), vbCrLf)
Close #1
 
'Then you can access each line like so:
 
MyString(0) 'Line 1
MtString(1) 'Line 2  and so on....
 
'Or you could loop through them...
 
For i = 0 to Ubound(MyLine)
        'Do something with the line here
        'Like with another array
    strTemp = MyLine(i)
    MyNewLine = Split(strTemp, ",")
        'Or what ever you need to do here
Next i