FileDialog 属性说明(VBA)

 
[日期：2008-06-18] 来源：  作者： [字体：大 中 小]
 
 
 
 
 
参阅应用于示例特性
返回一个 FileDialog 对象，该对象代表文件对话框的实例。
 
expression.FileDialog(fileDialogType)
 
expression      必需。该表达式返回“应用于”列表中的对象之一。
 
fileDialogType      MsoFileDialogType 类型，必需。文件对话框的类型。
 
MsoFileDialogType 可为以下 MsoFileDialogType 常量之一。
msoFileDialogFilePicker  允许用户选择一个文件。
msoFileDialogFolderPicker  允许用户选择一个文件夹。
msoFileDialogOpen  允许用户打开一个文件。
msoFileDialogSaveAs  允许用户保存一个文件。
示例
 
在本示例中，Microsoft Excel 打开文件对话框,允许用户选择一个或多个文件。选中这些文件之后，Excel 将逐条显示每个文件的路径。
 
Sub UseFileDialogOpen()
 
    Dim lngCount As Long
 
    ' Open the file dialog
    With Application.FileDialog(msoFileDialogOpen)
        .AllowMultiSelect = True
        .Show
 
        ' Display paths of each file selected
        For lngCount = 1 To .SelectedItems.Count
            MsgBox .SelectedItems(lngCount)
        Next lngCount
 
    End With
 
End Sub