Mega Code Archive

 

Categories / VisualBasic Script / File Path

 

Use the SelectedItems property of the FileDialog object to return the FileDialogSelectedItems collection

Sub selected()     Dim si As FileDialogSelectedItems     Set si = Application.FileDialog(msoFileDialogOpen).SelectedItems End Sub