Hi,
Does this help. Right click sheet tab and select view code then paste in the below code
VBA Noob![]()
Private Sub Worksheet_Change(ByVal Target As Range) Dim x As Range If Target.Column =< 5 Then Cells(ActiveCell.Row, "F").Select ActiveCell.Offset(-1, 0) = Date ActiveCell.Offset(-1, 1) = Environ("USERNAME") End If End Sub
Bookmarks