Evento OutlookBarPane.BeforeNavigate (Outlook)
Se produce cuando el usuario hace clic en un acceso directo del Panel de accesos directos para desplazarse a una carpeta diferente.
Sintaxis
expresión. BeforeNavigate( _Shortcut_ , _Cancel_ )
Expresión Variable que representa un objeto "OutlookBarPane".
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Shortcut | Obligatorio | OutlookBarShortcut | Acceso directo seleccionado por el usuario. |
| Cancel | Obligatorio | Boolean | False cuando se produce el evento. Si el procedimiento de evento establece este argumento en True, no se cambia la carpeta 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 impide que el usuario use el panel de accesos directos para abrir la carpeta Notes. El código se debe colocar 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. Si aún no tiene un acceso directo a la carpeta Notas , debe crear uno para ejecutar este ejemplo.
Public WithEvents myOlPane As Outlook.OutlookBarPane
Public Sub Initialize_handler()
Set myOlPane = Application.ActiveExplorer.Panes.Item("OutlookBar")
End Sub
Private Sub myOlPane_BeforeNavigate(ByVal Shortcut As Outlook.OutlookBarShortcut, Cancel As Boolean)
If Shortcut.Name = "Notes" Then
MsgBox "You cannot view the Notes folder."
Cancel = True
End If
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.