Auto Countdown time

[Dexir]

Hi,

I have the table like this

Start Date Start Time End Date End Time Remaining Days=D2+C2-B2-A2 (Format "dd") I got remaining days 20
27-10-18 12:00:00 PM 17-11-18 12:00:00 PM Remaining Time=D2+C2-B2-A2 (Format "[h]:mm:ss") I got remaining time like this. 486:10:15!

I want the remaining time auto countdown.
Thanks
Dexir

 

[mole999]

I think your system would need to stay live if the countdown is used,

you might select an end date time and Now() take one from the other and put a worksheet change event into the VBA and just update application.displaybar = result

if you run it as a timer then it gets more complex, starting and stopping code

 

[Logit]

.
Your formulas don't work here. ???

Option Explicit


Public bTimerOn As Boolean


Sub ToggleTimer() ' This Sub will switch the automatic timer on if it was off before, and vice-versa
bTimerOn = Not bTimerOn


Refresh ' It calls the Refresh Sub
End Sub


Sub Refresh() ' This Sub calculates the sheet and tells Excel to call it again after 1 second
Application.Calculate


If bTimerOn Then ' If bTimerOn is True, start refreshing automatically
Application.OnTime Now + TimeValue("00:00:01"), "Refresh" ' The intervall is set to 1 second but can be changed variably
End If
End Sub

Download workbook : https://www.amazon.com/clouddrive/share/62nLZjiHlrieejOF29uQB2F5L3PZagC8AAzkUH2IG55

 

[Dexir]

Hi Mole999
I have created a Macro Button to refresh, but still question is same that i want remaining time auto countdown, if there is any help to refresh a macro than tell me please, i'm weak in VBA.

Thanks
Dexir

 

[mole999]

this would work > https://answers.microsoft.com/en-us...in-excel/66468240-9293-44bf-9420-f10a8fe474cf expand the first answer copy it and adjust or post back here what isn't happening