Eventos da planilha com Excel VBA #01

Excel 2010

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

ActiveCell.Value = "ALTERADO"

End Sub

Excel 2010

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

MsgBox Target.Address

MsgBox Target.Row

MsgBox Target.Column

End Sub