If .InitialFileName isn\'t set, the "Select Folder" dialog FileDialog(msoFileDialogFolderPicker) uses the current directory
.InitialFileName
FileDialog(msoFileDialogFolderPicker)