本文转自：https://docs.microsoft.com/zh-cn/office/vba/api/word.application.filedialog
Application.FileDialog 属性 (Word)
返回一个FileDialog对象，该对象代表文件对话框中的单个实例。
语法
expression. FileDialog( _FileDialogType_ )
expression：必需。 代表应用程序对象的变量。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| FileDialogType | 必需 | MsoFileDialogType | 对话框类型。 |
示例
本示例显示另存为对话框。
Sub ShowSaveAsDialog()
Dim dlgSaveAs As FileDialog
Set dlgSaveAs = Application.FileDialog( _
FileDialogType:=msoFileDialogSaveAs)
dlgSaveAs.Show
End Sub
本示例显示打开对话框中，并允许用户选择打开多个文件。
Sub ShowFileDialog()
Dim dlgOpen As FileDialog
Set dlgOpen = Application.FileDialog( _
FileDialogType:=msoFileDialogOpen)
With dlgOpen
.AllowMultiSelect = True
.Show
End With
End Sub
网友评论