Propiedad DialogType
Devuelve una constante de MsoFileDialogType que representa el tipo de cuadro de diálogo que el objeto FileDialog está establecido para mostrar. Es de sólo lectura.
MsoFileDialogType puede ser una de estas constantes de MsoFileDialogType. |
msoFileDialogFilePicker |
msoFileDialogFolderPicker |
msoFileDialogOpen |
msoFileDialogSaveAs |
expresión.DialogType
expresión Requerida. Expresión que devuelve uno de los objetos de la lista Aplicar a.
Ejemplo
El ejemplo siguiente toma un objeto FileDialog de tipo desconocido y ejecuta el método Execute si es un cuadro de diálogo Guardar como o Abrir.
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