Importer .CSV fil i Excel via VBA

Hej

Jeg har problemer med at åbne en csv fil i et Excelregneark. Når koden herunder benyttes, åbnes csv-filen i en enkelt celle. Der ønskes, at csv-filen opdeles i celler hver gang der er et ";".

Hvad går der lige galt???

Håber, I kan hjælpe.

Sub importer()

Workbooks.OpenText Filename:="C:\ak0512.csv", DataType:=xlDelimited, semicolon:=True
       
End Sub

Vh

Tine