Hi all,
The code below currently displays the timestamp in the same worksheet as the updated cell. I wish to adapt the code to display the timestamp in range("BB:BB") of sheets("mfg").
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo safe_exit
Application.EnableEvents = False
Dim cell As Range
For Each cell In Intersect(Target, Range("AD:AD"))
If UCase(cell.Value2) <> "" And UCase(cell.Value2) <> "Not started" Then
cell.Offset(0, 25).Value = Now
cell.Offset(0, 25).NumberFormat = "dd-mmm-yy hh:mm:ss"
End If
Next cell
safe_exit:
Application.EnableEvents = True
End Sub
Bookmarks