Thread: timer
View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.misc
Steve[_9_] Steve[_9_] is offline
external usenet poster
 
Posts: 32
Default timer

On 28 Jan, 13:29, Matt Richardson wrote:
On Jan 28, 1:15 pm, Steve wrote:





On 28 Jan, 12:54, Steve wrote:


Hi all,


HYCH.


Am looking for some code to creat a countdown timer, was hoping for
hh:mm:ss & if possible lower, not sure if it is possible, but any help
would be greatly appreciated.


Steve


Forget this, got the timer sorted,, found old post on this site.


:)


But!


anyway to get a page to refresh after 20 secs?


Steve


Hi,

Try this.

Paste this into the worksheet's module:-

Private Sub Worksheet_Activate()
Call Recalculate
End Sub

Public Sub Recalculate()
Calculate
Application.OnTime earliesttime:=Now + TimeValue("00:00:20"), _
procedu="Recalculate"
End Sub

This should recalculate your worksheet every 20 seconds. *To change
the recalculation period just change the value in brackets after
'TimeValue'

Hope this helps,

Regards,
Matt Richardsonhttp://teachr.blogspot.com- Hide quoted text -

- Show quoted text -


many thanks,

works great,

5 star service as usual

Steve