Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
432to436
432to436
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Saveas .CSV mittels Macro

Forumthread: Saveas .CSV mittels Macro

Saveas .CSV mittels Macro
26.05.2004 08:48:54
Michael
Hallo
Wenn ich eine Excel-Datei manuell über "Datei" - "Speichern unter" als "CSV (Trennzeiche-getrennt) (*.csv)" speichere, wird automatisch das ";" als Trennzeichen verwendet und die Datumseinstellung belassen als "31.12.2004".
Wenn ich dasselbe über ein aufgezeichnetes Macro mache mit dem Code
ActiveWorkbook.SaveAs Filename:= _
"G:\Administrative\OctoOffice Excel\_Web User-ID\brainware.csv", FileFormat:= _xlCSV, CreateBackup:=False
wird das "," als Trennzeichen verwendet und das amerikanische Datumsformat verwendet.
Gibt es hier eine Lösung? Hat jemand eine Idee?
Besten Dank für die Hilfe im voraus.
Michael
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Saveas .CSV mittels Macro
26.05.2004 09:19:11
Heinz
Hallo Michael,
eine immer wiederkehrende Frage, hier eine Lösung:

Sub TextDateiErstellen()
Dim exportfile$, TB As Worksheet, z%, TMP$
exportfile = "C:\test.txt"
Dateinummer = FreeFile
Set TB = ThisWorkbook.Worksheets(1)
'Die folgende Zeile erzeugt eine neue Datei mit dem angegebenen Namen
'im angegebenen Pfad
Open exportfile For Output As #Dateinummer
'Die beiden Schleifen beziehen alle belegten Zellen in die zu erstellende Textdatei ein
For z = 1 To TB.UsedRange.Rows.Count
For s = 1 To TB.UsedRange.Columns.Count
'Das Semikolon ist durch jedes beliebige Feldtrennzeichen ersetzbar
TMP = TMP & CStr(TB.Cells(z, s).Text) & ";"
Next s
'Damit am Ende jeder Zeile, also nach der letzten Zelle kein Strichpunkt mehr gesetzt wird,
'muss das letzte Zeichen wieder abgezogen werden
TMP = Left(TMP, Len(TMP) - 1)
'Print fügt hier immer eine Zeile zur bestehenden Textdatei hinzu
Print #Dateinummer, TMP
'Die Variable TMP muss vor der Aufnahme der nächsten Zeile wieder geleert werden
TMP = ""
Next z
Close #Dateinummer
End Sub

Gruß
Heinz
Anzeige
AW: Saveas .CSV mittels Macro
27.05.2004 07:30:49
Michael
Hallo Heinz
Besten Dank - hat wunderbar funktioniert.
Liebe Grüsse
Michael
;

Forumthreads zu verwandten Themen

Tabellenblatt separat speichern als csv
Herbert

Hallo,
der beigefügte Code wurde mir freundlicherweise hier bereit gestellt. Aus einer Datei wird ein Tabellenblatt in eine neue Datei im Ordner C:\temp gespeichert. Das Dateiformat der neuen Datei ist csv. Die einzelnen Werte der neuen csv-Datei werden durch Semikolon getrennt. Ich benötig...
16.10.2008 16:07:00
Thread-ID: 1016905
6 Beiträge
per VBA prn-Datei erstellen
Ron

hallo,
weiß jemand von euch wenn ich per makro eine Exceltabelle als prn-Datei ausdrucken will wie ich diese automatisch mit einem vorher ermittelten Namen abspeichern kann?
Danke
Gruß Ron
19.11.2008 17:22:00
Thread-ID: 1026126
5 Beiträge
Anzeige
Export in neue CSV-Datei
Franz

Hallo zusammen,
ich möchte auf meinem Excelsheet den Zellbereich A100:C3000 in
eine neue CSV-Datei anlegen. Ich habe mal ein Codeansatz.
Hat jemand eine Idee?
Danke Gruß Franz
Sub Export_csv_datei() Dim iRow As Integer, i As Integer Dim sTxt As String, sFile As String, ze...
30.01.2009 08:40:00
Thread-ID: 1045283
8 Beiträge
Makro .CSV importieren/Exportieren
Hugo

Hallo,
muß eine .CSV Datei kommagetrennt in Spalten importieren.
Dann nach dem Bearbeiten wieder in eine .CSV Datei exportieren.
Benötigt wohl ein Makro.
Danke.
https://www.herber.de/bbs/user/60798.xls
29.03.2009 22:48:27
Thread-ID: 1065136
15 Beiträge
Tabellen als Grafiken exportieren
Christian

Hallo,
ich habe eine sehr breite Excel-Tabelle und würde diese gerne in ein Word-Dokument einfügen. Damit die Werte gut lesbar sind und sich auch die Fromatierung nicht ändert, würde ich gerne die Tabelle durch mehrere untereinanderstehende Grafiken in Word einsetzen. Im Prinzip also die ge...
24.06.2009 17:32:46
Thread-ID: 1084177
2 Beiträge
Makro per VBA in Datei erstellen
Marko

Hallo zusammen,
folgendes Problem:
ich habe eine Datei mir mehreren Tabellenblätter die Formeln enthalten.
Per VBA exportiere ich die Datei und enferne dabei die vorhandenen Makros sowie ersetzte die Formeln durch Werte.
Nun würde ich abschließend in den Export ein neues Makro i...
01.07.2009 17:22:37
Thread-ID: 1085801
3 Beiträge
csv-Datei erstellen mit Semikolon als Trennzeichen
Marika

Hallo zusammen,
ich muss aus Messwerten eine csv Datei erstellen, wo ein Semikolon das Spaltentrennzeichen und ein Komma als Dezimaltrennzeichen hinterlegt ist.
Das bekomme ich von Hand auch hin, indem ich Speichern Unter - Dateityp csv (MSDOS) verwende.
Ich möchte das ganze aber au...
18.08.2009 11:10:12
Thread-ID: 1096657
3 Beiträge
CSV Format, Delimiter ; (Semikolon), n. Komma
Peter

Guten Tag
Ich möchte eine Datei im CSV Format speichern.
Das klappt mit folgender Codezeile:
.SaveAs SavePath & "\" & File, FileFormat:=xlCSV
allerdings ist der Delimiter ein Komma und nicht wie gewünscht ein Semikolon.
Wie kann das geändert werden?
Danke für jed...
28.12.2009 09:23:04
Thread-ID: 1126047
3 Beiträge
csv-Datei erstellen
Herbert

Hallo,
was mache ich hier falsch? Wenn ich eine Tabelle manuell als csv-Datei speichere, sind die Daten hinterher in Spalten aufgeteilt, so wie es sein soll. Wenn ich das gleiche dann per VBA mache, werden die Daten nicht in die Spalten aufgeteilt, sondern stehen alle in einer Spalte, mit k...
26.01.2011 16:01:29
Thread-ID: 1197460
3 Beiträge
Save As *.csv
Sebastian Schick

Ich möchte eine Datei, die nur ein Blatt enthält, per Makro als csv-Datei mit Semikolon getrennt abspeichern. Als Dezimaltrennzeichen soll ein Komma verwendet werden. Ich benutze zum Speichern das Format: csv (comma delimited)Wenn ich das per Hand mache (und aufzeiche), funtioniert es auch:2;0,...
16.05.2002 11:09:09
Thread-ID: 121300
2 Beiträge
CSV Datei erstellen
Chris

Hallo zusammen,
folgendes Makro exportiert das Sheet Masterliste als CSV Datei auf dem Desktop. Das tut es auch.
Zusätzlich wird aber das Register "MASTERLISTE" in der Originaldatei in "KalenderCSV" umbenannt.
Weiss einer wieso?
Das Makro soll nur die Masterliste als CSV mit Ko...
03.11.2011 09:13:29
Thread-ID: 1236382
2 Beiträge
csv Datei erstellen
Chris

Hallo zusammen,
das Makro speichert mir das sheet Masterliste als csv-datei auf dem Desktop. Zusätzlich ändert mir es das Sheet "Masterliste" in der Originaldatei in "KalenderCSV" um. Wie kann ich letzteres umgehen?
Sheets("Masterliste").SaveAs Filename:=Environ("UserProfile") & "\D...
03.11.2011 09:14:54
Thread-ID: 1236383
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige