Evento OutlookBarGroups.BeforeGroupAdd (Outlook)
Se produce antes de agrega un nuevo grupo al panel de accesos directos, como resultado de la acción del usuario o mediante código de programación.
Sintaxis
expresión. BeforeGroupAdd( _Cancel_ )
Expresión Variable que representa un objeto OutlookBarGroups .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Cancel | Obligatorio | Boolean | False cuando se produce el evento. Si el procedimiento de evento establece este argumento en True, no se agrega el grupo al panel de accesos directos. |
Comentarios
Este evento no está disponible en Microsoft Visual Basic Scripting Edition (VBScript).
Ejemplo:
En este ejemplo de Visual Basic para aplicaciones (VBA) se impide que el usuario agregar un grupo al 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.
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_BeforeGroupAdd(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.