put this code into Sheet1's Module
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count = 1 Then
If Target.Value <> "" Then
If Target.Column = 3 And Target.Row > 1 Then
Target(1, -1) = Format(Now, "dd-mmm- hh:mm:ss")
Target(1, 0) = Application.UserName
End If
End If
End I
I have a worksheet in which I'd like to auto insert the date/time into
a cell in column A and the username into column B, if data is entered
or changed in the same row in column C.
What would be the best way to accomplish this ?
Thanks
Jeff
--
--