返回一个 FileDialog 对象,代表文件对话框的一个实例。
expression.FileDialog(dialogType)
expression 必需。返回“Applies To”列表中的一个对象的表达式。
dialogType 必需,MsoFileDialogType。文件对话框的类型。
| MsoFileDialogType 可以是下列 MsoFileDialogType 常量之一: | 
| msoFileDialogFilePicker | 
| msoFileDialogFolderPicker | 
| msoFileDialogOpen | 
| msoFileDialogSaveAs | 
该示例显示“另存为”对话框。
Dim dlgSaveAs As FileDialog
Set dlgSaveAs = Application.FileDialog( _
    FileDialogType:=msoFileDialogSaveAs)
dlgSaveAs.Show
该示例显示“打开”对话框,并允许用户选择多个文件打开。
Dim dlgOpen As FileDialog
Set dlgOpen = Application.FileDialog( _
    FileDialogType:=msoFileDialogOpen)
With dlgOpen
    .AllowMultiSelect = True
    .Show
End With