Compartilhar via


Eventos de objeto de planilha

Os eventos em planilhas são habilitados por padrão. Para exibir os procedimentos de evento da planilha, clique com o botão direito do mouse na guia da planilha e clique em Exibir código, no menu de atalho. Selecione um dos seguintes eventos, na caixa da lista Procedimento.

Os eventos de nível de planilha ocorrem quando uma planilha é ativada, quando o usuário altera uma célula da planilha ou quando a Tabela Dinâmica é alterada. O seguinte exemplo ajusta o tamanho das colunas de A a F sempre que a planilha é recalculada.

Private Sub Worksheet_Calculate() 
    Columns("A:F").AutoFit 
End Sub

Alguns eventos podem ser usados para substituir uma ação pelo comportamento padrão do aplicativo ou para fazer uma pequena alteração no comportamento padrão. O exemplo a seguir intercepta o evento de clique com o botão direito do mouse e adiciona um novo item de menu ao menu de atalho para as células B1:B10.

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, _ 
        Cancel As Boolean) 
    For Each icbc In Application.CommandBars("cell").Controls 
        If icbc.Tag = "brccm" Then icbc.Delete 
    Next icbc 
    If Not Application.Intersect(Target, Range("b1:b10")) _ 
            Is Nothing Then 
        With Application.CommandBars("cell").Controls _ 
            .Add(Type:=msoControlButton, before:=6, _ 
                temporary:=True) 
           .Caption = "New Context Menu Item" 
           .OnAction = "MyMacro" 
           .Tag = "brccm" 
        End With 
    End If 
End Sub

Confira também

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.