Compartir a través de


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.

Observaciones

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

Vea también

Objeto Explorer

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.