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.
- Activate
- BeforeDoubleClick
- BeforeRightClick
- Calculate
- Alteração
- Deactivate
- FollowHyperlink
- PivotTableUpdate
- SelectionChange
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.