Evento Explorer.BeforeViewSwitch (Outlook)
Se produce antes de que el explorador cambie a una nueva vista, como resultado de la acción de un usuario o mediante código de programación.
Sintaxis
expresión. BeforeViewSwitch( _NewView_ , _Cancel_ )
Expresión Variable que representa un objeto Explorer .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| NewView | Obligatorio | Variant | Nombre de la vista a la que cambia el explorador. |
| Cancel | Obligatorio | Boolean | False cuando se produce el evento. Si el procedimiento de evento establece este argumento en True, se cancela el modificador y no se cambia la vista actual. |
Comentarios
Este evento no está disponible en Microsoft Visual Basic Scripting Edition (VBScript).
Ejemplo:
En este ejemplo de Microsoft Visual Basic para Aplicaciones (VBA), se confirma que el usuario desea cambiar las vistas y se cancela el cambio si el usuario responde que no. El código de ejemplo debe incluirse en un módulo de clase, y se debe llamar a la rutina Initialize_handler antes de que Microsoft Outlook pueda llamar al procedimiento de evento.
Public WithEvents myOlExp As Outlook.Explorer
Public Sub Initialize_handler()
Set myOlExp = Application.ActiveExplorer
End Sub
Private Sub myOlExp_BeforeViewSwitch(ByVal NewView As Variant, Cancel As Boolean)
Dim Prompt As String
Prompt = "Are you sure you want to switch to the " & NewView & " view?"
If MsgBox(Prompt, vbYesNo + vbQuestion) = vbNo Then Cancel = True
End Sub
Consulte también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.