Hi Art,

Am Thu, 20 Aug 2015 09:36:12 -0700 (PDT) schrieb :

Private Sub Worksheet_Change(ByVal Target As Range)

MsgBox ActiveCell.Address

End Sub

try:

Private Sub Worksheet_Change(ByVal Target As Range)
MsgBox Target.Address
End Sub


Regards
Claus B.
--
Vista Ultimate / Windows7
Office 2007 Ultimate / 2010 Professional