find last updated cell 1

[osx99]

I have the following code which I want to trigger when changes are made to the range

However, I need to find the address of the cell or cells that have been updated. I.e the last updated active cells

ActiveCell.Row returns the wrong cell once <return> is pressed or mouse is clicked into another cell

Can anyone help?

Thanks,
Os

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("g100:i10000")) Is Nothing Then
'Type your Macro name here
MsgBox "ELR / Mileage Data change" & ActiveCell.Row
End If
End Sub

 

[PHV]

MsgBox "ELR / Mileage Data change" & Target.Row

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886