Evento OutlookBarGroups.BeforeGroupRemove (Outlook)
Se produce antes de quitar un nuevo grupo del panel de accesos directos, como resultado de la acción del usuario o mediante código de programación.
Sintaxis
expresión. BeforeGroupRemove
( _Group_
, _Cancel_
)
Expresión Variable que representa un objeto OutlookBarGroups .
Parameters
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
---|---|---|---|
Group | Obligatorio | OutlookBarGroup | Objeto OutlookBarGroup que se va a quitar. |
Cancel | Obligatorio | Boolean | False cuando se produce el evento. Si el procedimiento de evento establece este argumento en True, no se quita el grupo desde el panel de accesos directos. |
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 quite un grupo del panel de accesos directos. El código de ejemplo debe colocarse en un módulo de clase como ThisOutlookSession
, y se debe llamar a la Initialize_handler
rutina antes de que Outlook pueda llamar al procedimiento de evento. Aún se le pedirá al intentar eliminar un acceso directo. Sin embargo, no se eliminará el grupo incluso si hizo clic en Sí.
Dim WithEvents myOlGroups As Outlook.OutlookBarGroups
Dim myOlBar As Outlook.OutlookBarPane
Sub Initialize_handler()
Set myOlBar = Application.ActiveExplorer.Panes.item("OutlookBar")
Set myOlGroups = myOlBar.Contents.Groups
End Sub
Private Sub myOlGroups_BeforeGroupRemove(ByVal Group As OutlookBarGroup, Cancel As Boolean)
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.