With dlgFile .DialogTitle = "Choose A File" .fliter = "All Files *.*|*.*" .CancelError = True .ShowOpen End With
CommonDialog1.Flags = cdlOFNAllowMultiselect Or cdlOFNExplorer Or cdlOFNHideReadOnly