Office: CSV Datei mit VBA einlesen. Semikolon getrennt?

Hallo,

ich möchte eine CSV Datei mit einem Makro Öffnen. Wenn ich den Vorgang aufzeichen sieht der Code so aus:

Code:

Workbooks.Open Filename:= _
        "C:\Dokumente und Einstellungen\azu\Desktop\TestCSV.csv"

Wenn ich das aufegezeichnete Makro laufen lasse wird die Datei geöffnet, aber nicht nach Semikolon getrennt. Bedeutet mehrere Zellen in einer Zelle.
Wenn dich die Datei normal mit Excel öffne erkennt Excel die Semikolon Trennung und Formatiert Automatisch richtig.

Folgenden Code hab ich noch gefunden:

Code:

Workbooks.OpenText Filename:="C:\Dokumente und Einstellungen\azu\Desktop\TestCSV.csv", DataType:=xlDelimited, semicolon:=True

Aber leider funktioniert das auch nicht hat noch jemand eine Idee?

Ich benutzte Excel 2010
Im Anhang befindet sich die Datei zum testen.

Danke

 

Hallo!

Code:

  Workbooks.OpenText Filename:="C:\Dokumente und Einstellungen\azu\Desktop\TestCSV.csv", _
                     DataType:=xlDelimited, Semicolon:=True, Local:=True

Füge den Local-Parameter an!

 

Danke! Genau, das Local:= True hat geholfen