Hallo zusammen,
ich habe folgenden Code
Dim wb As Workbook
Dim lngZ As Long
Dim strFileName
Dim strFilter As String
ChDir "C:\Users\" & (Environ("Username")) & "\Downloads\"
strFilter = "csv Dateien(*.csv*), *.csv*"
strFileName = Application.GetOpenFilename(strFilter)
If strFileName = False Then Exit Sub
Set wb = Workbooks.Open(strFileName)
....
Excel öffnet aber nicht im gewünschten Pfad sondern immer im zuletzt geöffneten.
Was habe ich falsch ?
Gruß
Erik