Datei als CVS Datei speichern
29.09.2024 16:27:15
philipp
ich habe folgendes Makro:
Public Sub CSV_Kunden_D_speichern()
Dim DateiN As String
ChDir "C:\UAW_12\Toranlage_CSV"
ActiveWorkbook.Sheets("Toranlage_CSV").Select
ActiveWorkbook.SaveAs FileFormat:=xlCSV, CreateBackup:=False
DateiN = ThisWorkbook.Name
ActiveWorkbook.SaveAs filename:= _
"C:\UAW_12\Toranlage_CSV" & DateiN
End Sub
wenn ich die Datei damit speichere und schließe ohne weiteres zu speichern, werden die Daten
nach dem öffnen in einer Spalte angezeigt.
Also nicht so wie ich die Daten benötige.
Wenn ich aber die gespeicherte Datei schließe und die Abfrage ob gespeichert werden soll,
mit JA beantworte, wird die neue CVS Datei richtig gespeichert.
Also beim nochmaligen öffnen werden die Daten so angezeigt, wie vorher in der XLSM Version.
Frage, was muss ich in meinem Makro ändern ?
gruß philipp
Anzeige