Hi,
ich habe eine CSV Datei, die etwa so aussieht:
"Name";"A";"B";"C";"D";"E";"F";"G";"H";"I";"J";"K";"L";"M";"F 1";"F 2";"F 3";"F 4"
Zum Einlesen der Datei verwende ich den folgenden Code:
Datei = Application.GetOpenFilename("CSV-Dateien, *.csv", 1, MultiSelect:=False)
Workbooks.OpenText Filename:=Datei, DataType:=xlDelimited, _
TextQualifier:=xlTextQualifierDoubleQuote, semicolon:=True
Leider wird die Datei aber so geöffnet, dass der ganze Text in einer Zelle steht, also nicht nach den Semikola separiert wird. Was mache ich falsch?
Gruß und Danke im voraus,
pwek