Compartilhar via


Evento OutlookBarGroups.BeforeGroupRemove (Outlook)

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

Sintaxe

expression. BeforeGroupRemove( _Group_ , _Cancel_ )

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

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Group Obrigatório OutlookBarGroup O OutlookBarGroup que está sendo removido.
Cancel Obrigatório Boolean False quando o evento ocorre. Se o procedimento de evento define este argumento como True, o grupo não é removido do painel atalhos.

Comentários

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

Exemplo

Este Microsoft exemplo Visual Basic for Applications (VBA) impede que o usuário remova um grupo do 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. Você ainda será solicitado ao tentar excluir um atalho. No entanto, o grupo não será excluído, mesmo se você clicou em Sim.

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

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.