Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: CSV-Dateien Format innerhalb excel

CSV-Dateien Format innerhalb excel
08.03.2006 09:37:44
Rainer
Hallo,
ich habe eine CSV-Datei, die folgendermaßen aussieht:
--- Datei Beginn
Artikel;Bezeichnung;Preis;VE;EAN;
010400005;OZ-Buch WindowCol.Int.D-H-PL-SLO-CZ;10,94;1.000000;9783898580977;
010400008;OZ-Buch Das Weihnachts-Bastelbuch;12,50;1.000000;9783898580939;
010400009;OZ-Buch Das Oster-Bastelbuch;12,50;1.000000;9783898583015;
--- Datei Ende
Wenn ich diese Datei mit Excel (2003) öffne,
dann nimmt er bei den Artikelnummern (Artikel bzw. EAN) jweils
die Nullen vorne weg und formatiert das ganze als Zahl,
bei VE interpretiert er die Spalte auch als Zahl, ich hätte
jedoch gerne das er alles als Text interpretiert, wo kann ich so
was einstellen/erreichen.
MFG
Rainer Brosi
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: CSV-Dateien Format innerhalb excel
08.03.2006 11:27:14
u_
Hallo,
in ein Modul:

Sub readCSV()
Dim strTxt As String, lngI As Long, myarr
Open "n:\test.csv" For Input As #1   'Anpassen!!!
lngI = 1
Do Until EOF(1)
Line Input #1, strTxt
myarr = Split(strTxt, ";")
With Range(Cells(lngI, 1), Cells(lngI, UBound(myarr) + 1))
.NumberFormat = "Text"
.Value = myarr
End With
lngI = lngI + 1
Loop
Close #1
End Sub

Den Dateinamen musst du anpassen.
Gruß
Geist ist geil!
Anzeige
AW: CSV-Dateien Format innerhalb excel
08.03.2006 12:56:43
Rainer
Hallo,
der Dateiname ist bei uns variabel,
kann ich das ganze so machen, das ich
excel per batch aufrufe und den Dateinamen
als Variable übergebe, beim schließen soll
dann die Datei als Excel Datei gespeichert werden.
MFG
Rainer
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige