gibt es eine Möglichkeit, in VBA bei Verwendung des GetOpenFilename-Dialogs von vorne herein festzulegen, welcher Pfad im Dialogfeld angezeigt wird?
Danke und lg sagt
der Jens
Private Sub MyCB_Click()
Dim vFN As Variant
Debug.Print ActiveWorkbook.Path
ChDir ActiveWorkbook.Path
vFN = Application.GetOpenFilename(filefilter:="Excel sheets (*.xls),*.xls", Title:="Choose weather data file")
If vFN <> False Then
Label10.Caption = vFN
End If
End Sub
ChDrive Left(ActiveWorkbook.Path, 1)
ChDir ActiveWorkbook.Path
Gruß Ingolf