Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
552to556
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
552to556
552to556
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
CSV Export mit ;
25.01.2005 18:49:29
Sven
Hallo zusammen!
Folgendes Macro habe ich in meine Excel Datei eingefügt, damit jede Arbeitsmappe als CSV-Datei gespeichert wird. Das funktioniert schonmal ganz gut, nur dass die Spalten durch ein "," getrennt werden und nicht durch ein ";". Ebenso werden bei Zahlen das "," durch einen "." ersetzt.
Vielen Dank schonmal für Eure Hilfe!
Sven

Sub Einzeln_Speichern()
Dim bla As Integer
Application.ScreenUpdating = False
For bla = 1 To Sheets.Count
Sheets(bla).Copy
ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" + ActiveSheet.Name & ".csv", FileFormat:=xlCSV, local:=True
ActiveWorkbook.Close
Next bla
Application.ScreenUpdating = False
End Sub

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: CSV Export mit ;
26.01.2005 14:32:58
Sven
Danke für die Hilfe.
Jetzt habe ich eine lesbare CSV-Datei.
Kann man diese Funktion auch umschreiben, so dass beim ausführen des Makros jede Arbeitsmappe im CSV-Format unter dem jeweiligen Namen der Arbeitsmappe gespeichert wird?
Vielen Dank und viele Grüße
Sven
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige