Thanks for the help - I changed to column C being the trigger for A an
B. I put the code below into the sheet. I get no errors, but nothin
happens in the sheet. Any ideas on what I have missed?

Thanks


Private Sub Sheet1(ByVal Target As Range)
If Target.Columns.Count 3 Then Exit Sub
If Target.Column < 3 Then
Exit Sub
For Each cell In Target
If Not IsEmpty(cell) Then
Cells(Target.Row, "A").Value = Date
Cells(Target.Row, "B").Value = Time
Columns("A:B").AutoFit
End If
Next

End Su

--
GAMOSTEV
-----------------------------------------------------------------------
GAMOSTEVE's Profile: http://www.excelforum.com/member.php...fo&userid=1476
View this thread: http://www.excelforum.com/showthread.php?threadid=26384