Displaying Timer

[MAS]

Hi,

I have a timeout timer running with the following code.

RunWhen = Now + TimeSerial(0, 0, cRunIntervalSeconds)
Application.OnTime earliesttime:=RunWhen, procedure:=cRunWhat,
Schedule:=True

Workbooks("testmatrix.xls").Sheets("Sheet1").cell b14 = RunWhen

How do I get the timer to display counting down in cell B14

?

 

[David McRitchie]

In order to convert your expensive machine and software
to a cheap dedicated countdown timer you would have to set up
smaller intervals and set the value of the cell to the
time left. You cannot directly transfer the system clock
to show in a cell. It probably won't have much effect on the
rest of your system but it sure will affect Excel.

http://www.mvps.org/dmcritchie/excel/datetime.htm count down timer
http://www.mvps.org/dmcritchie/excel/youaskedforit.htm

 

[MAS]

David, thanks for that, it answered my question in a round about way. I have
now created a MsgBox brought up by a macro that will on request give me the
time remaining before the RunTime of RunWhat on the network.

Cheers.

 

[David McRitchie]

Sounds like a very good choice.

David, thanks for that, it answered my question in a round about way. I have
now created a MsgBox brought up by a macro that will on request give me the
time remaining before the RunTime of RunWhat on the network.

Cheers.

In order to convert your expensive machine and software
to a cheap dedicated countdown timer you would have to set up [clipped]

 

[Tushar Mehta]

You may want to take a look at
Countdown Timer
http://www.tushar-mehta.com/excel/software/countdown/index.html

--
Regards,

Tushar Mehta
www.tushar-mehta.com
Excel, PowerPoint, and VBA add-ins, tutorials
Custom MS Office productivity solutions