Trennzeichen bei dem Import eines Textdokuments in Excel werden nicht erkannt.

[Göppinger]

Hallo miteinander,

ich stehe vor folgendem Problem: Ich würde gerne ein Textdokument in Excel importieren. Dazu wähle ich unter Daten einen Import aus Text/CSV aus. Nun erkennt Excel zwar das Komma als Trennzeichen, kann aber offensichtlich nicht den Punkt im Textdokument erkennen.  
Um das Problem zu veranschaulichen, habe ich zwei Screenshots von Teilen der Daten in den Anhang gepackt.
Ich hoffe ich konnte mein Problem verständlich formulieren, und mit bedanke mich vorab für jede Hilfe.

Freundliche Grüße

[PIVPQ]

Hallo

Welche Excel Version wird benutzt? Läuft das ganze unter Windows?
Wie hast du die csv Datei importiert?
Ohne Testdatei wird es schwer was richtiges zu sagen.

[schauan]

Hallöchen,

das Problem liegt bei Deinem Import daran, dass Excel den Punkt als Tausendertrennzeichen interpretiert.
Entweder Du bekommst da was mit PowerQuery hin
oder importierst alles als Text, ersetzt die Punkte durch Komma und musst ggf. noch das Zahlenformat setzen ...
oder stellst vor dem Import in den Optionen | Erweitert die Trennzeichen um
oder ...

---

... noch ein Hinweis. Prüfe mal Deine Versionsangabe in Deinem Profil.
2020 dürfte eine recht seltene Version sein

[Göppinger]

Hallo,

ich habe in den Anhang einen kleinen Ausschnitt des Textdokuments gepackt. 
Möchte ich diese nun importieren wähle ich Text/CSV aus. Im nun geladenen Fenster belasse ich als Trennzeichen das Komma und klicke nun auf Laden.
Als Excel-Version nutze ich die Version 2108.

Viele Grüße

[RPP63]

Moin!
Mein M-Code in PowerQuery (analog Andrés Vorschlag):

PHP-Code:

let
    Quelle = Csv.Document(File.Contents("C:\Users\XXXXX\Desktop\Import_Text.txt"),[Delimiter=",", Columns=5, Encoding=1252, QuoteStyle=QuoteStyle.None]),
    #"Höher gestufte Header" = Table.PromoteHeaders(Quelle, [PromoteAllScalars=true]),
    #"Ersetzter Wert" = Table.ReplaceValue(#"Höher gestufte Header",".",",",Replacer.ReplaceText,{"Time [s]", "S1 [kPa]", "S23 [kPa]", "Eps1 [promille]"}),
    #"Geänderter Typ" = Table.TransformColumnTypes(#"Ersetzter Wert",{{"Time [s]", type number}, {"S1 [kPa]", type number}, {"S23 [kPa]", type number}, {"Eps1 [promille]", type number}})
in
    #"Geänderter Typ" 


ergibt

	A	B	C	D	E
1	Column1	Time [s]	S1 [kPa]	S23 [kPa]	Eps1 [promille]
2	0	0,002	10,91164644	0	-0,008967716
3	1	0,004	11,13433311	0	0,004317789
4	2	0,006	10,91164644	0	-0,008967716
5	3	0,008	11,35701977	0	0,004317789
6	4	0,01	10,46627312	0	-0,008967716
7	5	0,012	10,91164644	0	-0,002324963
8	6	0,014	11,35701977	0	0,007639166
9	7	0,016	11,13433311	0	0,007639166
10	8	0,018	11,35701977	0	0,007639166
11	9	0,02	10,91164644	0	-0,002324963
12	10	0,022	11,57970643	0	0,000996413

Übrigens verwende ich für solche Sachen lieber den Legacy-Assi, den man aber erst wie folgt freischaltet:
Datei → Optionen → Daten → entsprechenden "alten" Text-Assi freischalten

Dann kann man in Schritt 3 von 3 → Optionen den Dezimaltrenner auf den Punkt ändern.

Gruß Ralf

[Göppinger]

Hallo, 
ändere ich die Trennzeichen unter den Excel Optionen, bringt dies keinen Erfolg.
Die Punkte durch Komma selbst zu ersetzen ist ausgeschlossen, da das Original-Textdokument weit über 200.000 Zeilen groß ist.

[RPP63]

In den Optionen schaltest Du den seit Äonen bekannten Textassistenten frei, der natürlich locker mit großen CSV klat kommt.

Wie es mit PowerQuery geht, habe ich ebenfalls geschrieben.

[schauan]

Hallöchen

@Ralf,
ich denke, das war auf meine Antwort bezogen

@all,
Das mit dem Trennzeichen umstellen funktioniert übrigens auch beim Öffnen der csv statt dem Importieren, da kommt der alte Text-Assi .
ansonsten

Die Punkte durch Komma selbst zu ersetzen ist ausgeschlossen, da das Original-Textdokument weit über 200.000 Zeilen groß ist.

Das könntest Du schon vor Excel im Texteditor machen. Du müsstest nur zuerst z.B die Trennzeichen - Kommata durch Semikola ersetzen. Mit Suchen und Ersetzten über alles, nicht einzeln in jeder Zeile / "Spalte" ...

[snb]

In VBA:

Code:

Sub M_snb()
  Workbooks.OpenText "G:\OF\import_text.txt", , , , , , 0, 0, 1, 0, 0, , , , "."," "
End Sub