Wooders,

This should do it. If you put two buttons on a sheet to run the Initiate and
StopIt routines, you can start and stop the process.

Option Explicit
Private dNextTime As Double
Private dEndTime As Double

Sub Initiate()
dEndTime = Now + TimeValue("01:00:00")
Recalc
End Sub

Sub Recalc()
dNextTime = Now + TimeValue("00:00:05")
If dNextTime < dEndTime Then Application.OnTime dNextTime, "Recalc"
Application.Calculate
End Sub

Sub StopIt()
Application.OnTime dNextTime, "Recalc", , False
End Sub

Robin Hammond
www.enhanceddatasystems.com
Check out our XspandXL add-in


"Wooders" wrote in message
...
Please help

All I want to do is write (record and edit) a macro in
excel that will repeat the calculate (F9) function every 5
seconds for a set period i.e. an hour.

I am really sure this is very easy if you know how. This
is for use in a small countdown program that at the moment
I manually have to hit the F9 key.

Can someone guide me, thanks in advance.

wooders