Auto Refresh the =Now() function

[inq80]

Hi,

Could someone point me in the right direction for an auto refresh solution. I thought this would be a simple issue but a quick google brings up complete rubbish

I've got a due by date in one cell, the =now() function in another, then a third was calculates the difference in hours between the two. I need this to automatically refresh every second so the cell which calculates the difference acts like a countdown clock.

Can anyone point me in the right direction?

thanks

edit:

found this which works for now...

Place this code in the ThisWorkBook Module:


Private Sub Workbook_Open()
****Dim CalcTime As String
****CalcTime = Format(WorksheetFunction. _
****Ceiling(Timer, 60) / 86400, "long time")
****Application.OnTime TimeValue(CalcTime), "UpdateTime"
End Sub



And this code in a Standard Module :


Public Sub UpdateTime()
****Range("I11").Calculate
****Application.OnTime Time + _
****TimeSerial(0, 1, 0), "UpdateTime"
End Sub
Place this code in the ThisWorkBook Module:


Private Sub Workbook_Open()
****Dim CalcTime As String
****CalcTime = Format(WorksheetFunction. _
****Ceiling(Timer, 60) / 86400, "long time")
****Application.OnTime TimeValue(CalcTime), "UpdateTime"
End Sub



And this code in a Standard Module :


Public Sub UpdateTime()
****Range("I11").Calculate
****Application.OnTime Time + _
****TimeSerial(0, 1, 0), "UpdateTime"
End Sub