VBA: Ativando uma macro por cliques

Mudando o valor de uma célula conforme o clique.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Cells(1, 4).Value = Target.Address(False, False)

End Sub

Essa macro envia para a célula D1 o endereço da última célula selecionada.

A cada seleção de célula, a macro é chamada.

Caso você tenha uma dica ou truque, envie para nós: [email protected]

Por: Douglas Hideo