How to Create a Countdown Timer Clock in Excel and VBA

This is a simple tutorial of how to create a simple countdown in Excel 2007 using Application.Ontime event in VBA. this is a backbone and template you can use to create a lot of different functions based on time. if you have requests or would like to see how to do some other creative solution in excel, please mention in the comments and I will try to see what I can do to help or show how.

[dagultara]

Yes. A video posted more than 2 years ago and it helped an Excel newcomer. Thank you. Now all I need is to learn how to place a textbox for each of my sheet and triggered only by one button.

[jwf]

Your video tutorial format and presentation is EXCELlent !!! Much appreciation for this clear and concise presentation.

[MalaysiaTamilanVlogs]

i am 12 old year boy but i done it with this video☺☺☺.best video ever

[ckrampertracing]

Thanks for posting! I adapted this to count upward and added a reset button.

[darrylstipsadventures]

good video....got eveything answered after reading entire post

thx alot

[deannac]

Great tutorial...Something I really needed for a project that I am working on. Thank you!

[bradbeeksma]

Excellent demo! Works perfect thanks so much

[juliengure]

Here is the code for 2010 excel user .thanks a lot to anameiwontforget

Sub starttimer()
Application.OnTime Now + TimeValue("00:00:01"), "nexttick"
End Sub

Sub nexttick()
If Worksheets(1).Range("B1") = 0 Then Exit Sub
= Range("b1").Value - TimeValue("00:00:01")

If Range("b1").Value <= TimeValue("00:00:10") Then
Worksheets(1).Shapes("TextBox 1").Fill.ForeColor.RGB = RGB(255, 0, 0)
Else
Worksheets(1).Shapes("TextBox 1").Fill.ForeColor.RGB = RGB(255, 255, 255)
End If

starttimer
End Sub

Sub stoptimer()
On Error Resume Next
Application.OnTime Now + TimeValue("00:00:01"), "nexttick", , False
End Sub
Sub resettimer()
= TimeValue("00:15:00")
End Sub

[cathall]

THANK YOU FOR THIS AWESOME VIDEO! SUPER helpful!!!!

[terrymadeley]

Great video, many thanks. Very clear.

[Rafael-fosp]

Awesome stuff! Just wondering, is the type of coding in Excel shared with Google Sheets? I want to multi platform this

[drphu]

I Wanted to learn this a long time! THX (Pun intended!)

[howieleem]

Interesting video. I have the timer working now as you described it. What I need is a timer that counts down from 30 days to zero. Is this an easy mod to the code you wrote?

[darrylstipsadventures]

How would you go about adding a reset button that would reset back to original start time?

thx

[JRotch]

Thanks for the help! One question. How can I get a count-up timer to go past 23:59:59 without resetting to 0:00:0? I tried changing the cell format but no luck.

[ricro]

Thanks for this explanation. How do I get this timer to be active and visible  in several worksheets in the same workbook

[quechismoso]

This video was so helpfull,
but do you know how to make it start again it self?

[nahidmukadam]

first of all i would like to thank you for your information to help me to completing my project.
but i do find some problem as like
1)if timer is on and if i do want to type in another cell the timer is been stop.
2)and when timer is complete it delete the formula from the reference cell
as like cell "C:6" IS my number value (for example:- 90)
and cell "P:3" has formula of =DOLLARED(C6, 60)/1440 With format of time"00:00:00" so that if i type 90 in cell(C:6) it convert with the formula and show value (01:30:00) in "P:3"
and ''P:3" is the reference to my text box

[rmng]

Good. Exactly what I was looking for.. the problem is that o Mac if I start the timer and then I select another application to do something else, the timer gets frozen. It will continue only if I select excel window again.. any idea?

[piotrszymanski]

Hi will it work for multiple rows in excel? I creating spreadsheet with multiple tasks on it and wants countdown time for each one. BTW thanks for video.