by Nguyen Thanh Canh (1 Submission)
Category: Databases/Data Access/DAO/ADO
Difficulty: Intermediate
Date Added: Wed 3rd February 2021
Rating: (2 Votes)
It's easy to generate a CSV file with any delimiter by using this class module.
Hope useful to anyone.
Assumes
How to use it?
See sample
First, add this module to class module entry in your project.
Declare a variable:
Dim CSVFile as New NewCSV
With CSVFile
.FileName=
.Delimiter={input one character}
.Header={default is False}
If Dir(.FileName)<>"" then
.Open
.MoveFirst
Do While Not .EOfF
Debug.Print .Fields(0)
.MoveNext
Loop
EndIf
End With