Thanks. The VBA works great,





On Tue, 03 Jul 2007 07:17:58 -0700, Gord Dibben <gorddibbATshawDOTca
wrote:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
''Col B time will not change if data in Col A is edited
On Error GoTo enditall
If Target.Cells.Column = 2 Then
n = Target.Row
If Excel.Range("B" & n).Value < "" _
And Excel.Range("A" & n).Value = "" Then
Excel.Range("A" & n).Value = Format(Now, "dd mmm yyyy hh:mm")
End If
End If
enditall:
End Sub