Hi Francois

Rightclick the sheet tab, choose "view code", paste this code into it:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Cel As Range
For Each Cel In Target
If Cel.Column = 1 Then 'A column:
Cel.Offset(0, 1).Value = Now
End If
Next
End Sub

HTH. Best wishes Harald

"Francois Ashton" skrev i melding
...
Hi all

I need a function/program that enters the time in a cell when the cell
next
to it has a number placed in it.

For instance if I put number 123 into A5 then I need the time that it is
entered put into B5.

I have tried using the standard functions - for instance "now()" but then
when I enter a number in the next row the time gets updated and I don't
want
it to update all the time. I want to use this for timing people
participating in races. Obviously I will have a start time and then
subtract the one from the other to get the actual time of participation.

I have done some programming a while ago and am pretty rusty at this
stage -
hopefully it will come back to me quite quickly.

Thanks

Francois