Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
276to280
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
276to280
276to280
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

CSV-Export mit Komma als Trennzeichen

CSV-Export mit Komma als Trennzeichen
07.07.2003 20:44:34
Jan
Hallo!
Wie kann ich eine Excel-Tabelle (Office XP) als CSV-Datei exportieren, die mit Kommas (!) - nicht Semikolons - die daten trennt? Wenn ich auf "speicher unter..." gehe kann ich nur mit semikolon exportieren.
Danke!
gruß
jan

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: CSV-Export mit Komma als Trennzeichen
07.07.2003 21:35:55
Ramses
Hallo,
und wie willst du die Daten wieder importieren ?
In Deutschland werden alle Nachkommazahlen durch ein Komma getrennt.
Nach welchem Kriterium willst du da beim Import verfahren ?
Gruss Rainer

AW: CSV-Export mit Komma als Trennzeichen
07.07.2003 21:42:28
jan
ich will ja gar nicht wieder importieren. ich brauche das als vorlage für eine MYSQL-datenbank. dort werden die daten mit komma getrennt gespeichert.

AW: CSV-Export mit Komma als Trennzeichen
07.07.2003 21:57:30
Ramses
Hallo,
und wie trennt deine Datenbank die Zahlen auf ?
Mit Standardmitteln ist das nicht machbar, da müsste man ein Makro schreiben.
Dazu benötige ich aber verschiedene Angaben wie Datenstruktur und wo die Daten stehen.
Gruss Rainer

Anzeige
AW: CSV-Export mit Komma als Trennzeichen
07.07.2003 22:12:31
jan
ist für ein gästebuch. hier die vorlage:
INSERT INTO bgb_posts (postid, iconid, authorname, posttime, message, comment, commenttime, nosmilies, comment_nosmilies, email, homepage, icq, aim, yim, msn, ipaddress, useragent)
die daten werden dabei jeweils von ' eingeschlossen, also zb. 'deine@email.de'

Das geht dann so...
07.07.2003 23:05:47
Ramses
Hallo,
hier das Makro.
Damit sollte dein Problem eigentlich gelöst sein:

Sub Export_Comma_CSV()
Dim i As Long, n As Integer
Dim expPath As String, expFile As String, expStr As String, expDiv As String
expPath = "C:\" 'Exportpfad mit Backslash am Ende !!
expFile = "sqlImport.csv"
expDiv = "'"
Close #1
Open expPath & expFile For Append As #1
'Die Daten beginnen in Apalte A
For i = 1 To Range("A65536").End(xlUp).Row
expStr = ""
'Die Daten beginnen in Zeile 2
For n = 1 To Range("IV2").End(xlToLeft).Column
If n = 1 Then
expStr = expDiv
End If
expStr = expStr & Cells(i, n).Value & expDiv & ",'"
Next n
Print #1, expStr
Next i
Close #1
End Sub

Das Ergebnis in der Datei sieht z.B. so aus:
'1','2','3','rainer@e-maile.de','122.35','6','7','8','9','10','11','12','13','14','15','16','17','
Gruss Rainer

Anzeige
AW: Das geht dann so...
08.07.2003 10:06:52
jan
Super! Vielen dank! Ich werde das heute mal ausprobieren. Falls ich noch eine Frage haben sollte, schreibe ich nochmal!
Gruß
jan

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige