csv Datei einlesen und nach ; trennen
Einzel
haben ein Code der mir eine CSV Datei öffnet und nach ; trennt. Das hat auch immer funktionirt.
Auf einmal trennt mir der VBA Code aber nicht mehr nach ;. Öffnen geht noch, nur die Trennung ist falsch.
Kann mir jemand sagen wieseo das nicht mehr klappt?
Hier der Code:
Sub Datenimport()
Dim Importdatei$, Verzeichnis$
Verzeichnis = "G:\"
On Error Resume Next
ChDir Verzeichnis
Importdatei = Application.GetOpenFilename("Exceldateien (*.csv), *.csv")
Application.ScreenUpdating = False
Workbooks.Open "Protokoll_1.csv", delimiter:=";"
End Sub
MfG
Stephan