Moin,
ich möchte csv-Listen einlesen. Dazu öffne ich per script die Datei mit opentext.
Workbooks.OpenText Filename:=strPfad & "\" & strDatei, DecimalSeparator:=",", Space:=True
Wenn ich die CSV-Datei in Excel öffne, ist die Tabelle richtig konvertiert (s.u.). Wird sie per Script geöffnet, sind die Trennmarken falsch erkannt.
Auf jeden Fall werden die Dezimal-Kommata als Trennung erkannt. Versuche Tabs, Leerstellen oder Semikola als Trennung zu installieren und das Komma als Dezimal-Trennung zu fixieren funktionieren irgendwie nicht. Da die Kommata bei der script- Öffnung auch in Semikola konvertiert wurden, ist die Korrektur nahzu unmöglich.
Hat jemand eine Idee?
Ergebnis-Beispiel, oben per script, unten über Datei öffnen:
Uhrzeit |
Bezug [kW] |
Einspeisung [kW] |
Verbrauch [kW] |
Ladung [kW] |
Entnahme [kW] |
Erzeugung [kW] |
Akku [V] |
Akku [A] |
Füllung [%] |
29.03.2021 00:05:10;1 |
695448;0;1 |
709951;0;0 |
01396;0 |
000363;47 |
386002;-0 |
29;0 |
|
|
|
29.03.2021 00:05 |
1,695448 |
0,000000000 |
1,709951 |
0 |
0,01396 |
0,000363 |
47,386002 |
-0,29 |
0
|
|