Bob;

Thanks vm. that will do the trick. Do you know if I can also run another
concurrent On.Time procedure? Or will the second one get messed up 'cause
calling "UpdateTicker" every second?

Do you know why just using =Now() in a cell dosen't work?

Debbie

"Bob Phillips" wrote:

Via code


Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.OnTime nTime, "UpdateTicker", , False
End Sub

Private Sub Workbook_Open()
Call UpdateTicker
End Sub

'This is workbook event code.
'To input this code, right click on the Excel icon on the worksheet
'(or next to the File menu if you maximise your workbooks),
'select View Code from the menu, and paste the code

in a standard code module, add

Option Explicit

Public nTime As Long

Sub UpdateTicker()
Worksheets(1).Range("A1").Value = Format(Time, "hh:mm:ss")
nTime = Now + TimeSerial(0, 0, 1)
Application.OnTime nTime, "UpdateTicker"
End Sub


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"Debbie Sheperd" wrote in message
...
Hello;

In a worksheet single cell I have the formula =NOW(). I need that to run
&
show time constantly. However, sometimes it just stops at a certian time
and
won't refresh until some other action happens on the worksheet. Any
suggestions on how I can have the time (h,m,s) show in a cell on constant
basis?

Debbie