I copy data into a spreadsheet, use VBA to format it, then save that sheet into a CSV file.
I use the following code:
ws.SaveAs Filename:=filestr, Fi
Use xlSCVMSDOS instread of xlCSV
ActiveWorkbook.SaveAs Filename:="my File.csv", FileFormat:= xlCSVMSDOS, Local:=True
It worked for me