Write to a CSV file

[alvin Kuiper]

Hi!!
I use this:
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.OpenTextFile("test.csv", 8)
f.Writeline Report_lageroversigt.nr.value & ";" &
Report_lageroversigt.Navn.value & ";" &
Report_lageroversigt.Sum_Of_antal.value
f.Close

Its work fine in a text file, but when i write to a csv file and open this
file en excel
then the first row (1) is empty
why?

 

[Douglas J. Steele]

What exactly do you mean by "work fine in a text file"? Are you saying that
when you open the file in Notepad, there's no blank line at the top?

There's nothing intrinsic to the code that should cause a blank line, but
remember that the 8 in the call to the OpenTextFile method means you're
appending to an existing file. Perhaps there's a blank line already in the
file.