VBA - open folder

[Jeff]

Hi,

I saw this code in a book - it allows you to choose a directory path.

With Application.FileDialog(msoFileDialogFolderPicker)
.InitialFileName = Application.DefaultFilePath & "\"
.Title = "Please select a location for the backup"
.Show
If .SelectedItems.Count = 0 Then
MsgBox "Canceled"
Else
MsgBox .SelectedItems(1)
End If
End With

Here is the problem - when I choose a directory I cannot see the files in
the directory - is there a way to change the code so that I can see the files?

Thanks for your help

 

[Vergel Adriano]

Jeff,

Replace msoFileDialogFolderPicker with msoFileDialogFilePicker