Compartir a través de


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 .

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

Objeto OutlookBarGroups

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.