Set the AllowMultiSelect property of the dialog box to allow multiple selections in the dialog box : FileDialog « File Path « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. File Path
  3. FileDialog

Set the AllowMultiSelect property of the dialog box to allow multiple selections in the dialog box

 
Sub OpenDialog()
    Dim dlgOpen As FileDialog
    Set dlgOpen = Application.FileDialog( _
        DialogType:=msoFileDialogOpen)

    With dlgOpen
         .AllowMultiSelect = True
         .Show
    End With
    msgBox dlgOpen.SelectedItems(1)
End Sub








Related examples in the same category

1.The FileDialog Object
2.Open File Open Dialog and get the selection (Dialog Types Used with the FileDialog Object)
3.Use the SelectedItems property of the FileDialog object to return the FileDialogSelectedItems collection.
4.You can use the Add method of the FileDialogFilters collection object to create your own list of filter
5.Get selected paths
6.FileDialog with JPG file filter
7.FileDialogFilters
8.User selects path to save HTML files
9.Displays a dialog box that allows the user to select a directory. The selected directory name (or "Canceled") is then displayed by using the MsgBox function.