Hallo Forum,
ich möchte CSV-Dateien in einer Schleife einlesen. Hier eine Beispieldatei als txt-Datei.
Die Spalten A bis E ("Close") kann ich auch ohne Probleme einlesen mit folgendem Code.
Columns("E:E").Select
Selection.TextToColumns Destination:=Range("e1"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
:=Array(1, 1), TrailingMinusNumbers:=True
Das klappt allerdings nicht beim "Volumen" in Spalte F. Ich vermute, dass nach dem Volumen kein Tab mehr kommt bzw. kein Semikolon (beim download der csv-Dateien kann ich auch ein Semikolon als Trennzeichen vorgeben - allerdings steht dann nach dem Volumen bzw. der Volumenzahl kein Semikolon.
Nun ist meine Frage: wie lautet der richtige VBA-Code für Spalte F:F, damit auch diese Spalte mit in die Exceldatei eingelesen wird.
Variante A: siehe Beispieldatei
https://www.herber.de/bbs/user/153195.txt
Variante B: wenn ich als Trennzeichen "Semikolon" vorgebe, aber nach der letzten Zahl kein Semikolon mehr steht...
Danke vorab
Bernd