Showing last editing date

K

Kenny

I was wondering if there is a way to have one cell show the date of when
another cell was last edited.
 
R

Rowan

You can use a change event. Assume you want cell B1 to track when last A1 was
changed. Right click sheet tab, select View Code and paste the macro below:

Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo ErrorHandler
Application.EnableEvents = False
If Target.Address = "$A$1" Then
Range("B1").Value = Date
End If
ErrorHandler:
Application.EnableEvents = True
End Sub

Hope this helps
Rowan
 
Top