Hello,
I would like to try to use this timestamp code in 2 different columns on same worksheet.
Based on entry in column A the date timestamp is entered in column B
I'd like to repeat this capability where when an entry is made in column W a date timestamp is entered in column X
Can someone assist please?
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
With Target
If .Count > 1 Then Exit Sub
If Not Intersect(Range("A4:A10000"), .Cells) Is Nothing Then
Application.EnableEvents = False
If IsEmpty(.Value) Then
.Offset(0, 1).ClearContents
Else
With .Offset(0, 1)
.NumberFormat = "mmm dd yyyy hh:mm AM/PM"
.Value = Now
End With
End If
Application.EnableEvents = True
End If
End With
End Sub
Bookmarks