Office VBA教程:DialogType属性

返回一个MsoFileDialogType 常量,表示 FileDialog对象显示的文件对话框类型。只读。

MsoFileDialogType 可以为下列 MsoFileDialogType 常量之一。
msoFileDialogFilePicker
msoFileDialogFolderPicker
msoFileDialogOpen
msoFileDialogSaveAs

expression.DialogType

expression   必需。该表达式返回“应用于”列表中的对象之一。

VBA示例

本示例将 FileDialog对象视为未知类型,并运行 Execute方法判断是“另存为”还是“打开”对话框。


Sub DisplayAndExecuteFileDialog(ByRef fd As FileDialog)
    'Use a With...End With block to reference the FileDialog object.
    With fd
        'If the user presses the action button...
        If .Show = -1 Then
            'Use the DialogType property to determine whether to
            'use the Execute method.
            Select Case .DialogType
                Case msoFileDialogOpen, msoFileDialogSaveAs: .Execute
                'Do nothing otherwise.
                Case Else
            End Select
        'If the user presses Cancel...
        Else
        End If
    End With
End Sub

上页:Office VBA教程:DescriptionText属性 下页:Office VBA教程:DisableAskAQuestionDropdown属性

Office VBA教程:DialogType属性

Office VBA教程:DisableAskAQuestionDropdown属性 Office VBA教程:DisableCustomize属性
Office VBA教程:DisplayFonts属性 Office VBA教程:DisplayKeysInTooltips属性
Office VBA教程:DisplayTooltips属性 Office VBA教程:DropDownLines属性
Office VBA教程:DropDownWidth属性 Office VBA教程:Enabled属性
Office VBA教程:ExpireDate属性 Office VBA教程:Extended属性
Office VBA教程:Extensions属性 Office VBA教程:FaceId属性
Office VBA教程:FeatureTips属性 Office VBA教程:FileName属性
Office VBA教程:Files属性 Office VBA教程:FileType属性
Office VBA教程:FileTypes属性 Office VBA教程:FilterIndex属性
Office VBA教程:Filters属性 Office VBA教程:FixedWidthFont属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号