csv import second row contains column headings

[dr_patso]

I have a process I need to automate.

I have been manually deleting the first row on the CSV since it just contains the CSV title and the second row actually contains column headings

so the checkbox for first row contains column headings is sadly useless to the original file..



any remedy for this? can I delete the first row upon import or something to fix this automatically?

[rpeare]

you can use the filesystemobject utility to remove the first line of the CSV or even the first two if you don't care about your header row.

Let's say you have a file named

c:\TestImport.txt

you would use this:

Dim fInput
Dim fOutput
Dim fs
Dim sline As String

Set fs = CreateObject("Scripting.filesystemobject")
Set fInput = fs.opentextfile("c:\input.txt")
Set fOutput = fs.createtextfile("c:\output.txt")

sline = fInput.readline 'if you want to skip the first line

Do While fInput.atendofstream <> True
    sline = fInput.readline
    fOutput.writeline sline
Loop

to delete the first row.

Then of course if you had a series of files you wanted to do this with all in the same folder you could use the filesystemobject to cycle through all those files too.