Application.FileDialog
29.09.2005 15:28:59
eres
mit folgendem Code wähle ich zu Beginn meines Makros einen Arbeitspfad aus:
Dim ordner As FileDialog
Set ordner = Application.FileDialog(4)
If ordner.Show = -1 Then
Range("A1") = ordner.SelectedItems(1) & "\"
End If
Set ordner = Nothing
klappt prima.
Was mich ein wenig stört ist, dass bei Aufruf des Auswahldialogs standardmässig die Root meines Laufwerks angezeigt wird, also z.B. D:\
Frage: Kann man den Auswahldialog auch so aufrufen, dass er standardmässig ein "tieferes" Verzeichnis als Ausgangspunkt anzeigt (z.B. D:\Projekt1\Abschnitt25\)
Vielen Dank im voraus für die Hilfe/Antwort.
Gruss
eres