Trennzeichen in CSV-Dateien
03.04.2005 21:26:06
Christoph
ich möchte beim Export aus Excel in eine CSV Datei das Trennzeichen (Delimiter) selbst definieren. Ich bekam schon einen Tipp, sehe allerdings nicht, wo ich das Trennzeichen definieren kann. Es sollte möglichst ein "|" werden.
Sub CSVExport()
Dim sFile As String
ActiveSheet.Copy
sFile = "test.csv"
ActiveWorkbook.SaveAs _
Filename:=sFile, _
FileFormat:=xlCSV
ActiveWorkbook.Close savechanges:=False
Workbooks.Open sFile
Columns.AutoFit
MsgBox "Weiter"
ActiveWorkbook.Close savechanges:=False
End Sub
Viele Grüße, Christoph