返回一个代表单个文件对话框实例的 FileDialog 对象。
expression.FileDialog(dialogType)
expression 必需。返回“应用于”列表中的一个对象的表达式。
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