ich möchte eine csv-Datei temporär erstellen und per outlook verschicken, Trennzeichen muss ein Semikolon sein. Habe folgenden Code (Auszug), aber leider bekomme ich immer ein Komma als Trenner:
'CSV-Datei versenden
Dim strMailEmpfaenger As String
i = Application.ActiveWorkbook.Path
strMailEmpfaenger = "xxx@yyy.com"
strTempName = Sheets("Makro").Cells(5, 8).Value
Sheets("Output").Copy , (";")
ChDir i
'AlsTextSpeichern (strTempName)
ActiveWorkbook.SaveAs Filename:=i & "\" & strTempName, FileFormat:=xlCSV, _
CreateBackup:=False, TextCodePage:=850, local:=True
If Application.MailSystem xlNoMailSystem Then
Application.ActiveWorkbook.SendMail strMailEmpfaenger, "SAP-Upload LogCon", False
End If
ActiveWorkbook.Close False
'Die temporär erstellte Arbeitsmappe wieder löschen
Kill i & "\" & strTempName & ".csv"
Habt ihr einen Tipp? Ich möchte gerne die Ländereinstellungen außer Acht lassen, da meine Datei von verschiedenen Usern in mehreren Ländern genutzt werden soll.
Danke vorab!
Peter