Share via


Evento OutlookBarGroups.BeforeGroupAdd (Outlook)

Ocorre antes de um novo grupo é adicionado ao painel atalhos, como resultado de uma ação do usuário ou pelo código de programa.

Sintaxe

expression. BeforeGroupAdd( _Cancel_ )

Expressão Uma variável que representa um objeto OutlookBarGroups .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Cancel Obrigatório Boolean False quando o evento ocorre. Se o procedimento de evento define este argumento como True, o grupo não é adicionado ao painel atalhos.

Comentários

Esse evento não está disponível no Microsoft Visual Basic Scripting Edition (VBScript).

Exemplo

Este exemplo Visual Basic for Applications (VBA) impede que o usuário a adição de um grupo ao painel atalhos. O código de exemplo deve ser colocado em um módulo de classe como ThisOutlookSession, e a Initialize_handler rotina deve ser chamada antes que o procedimento de evento possa ser chamado pelo Outlook.

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

Confira também

Objeto OutlookBarGroups

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.