How to make a countdown timer in powerpoint using VBA

Sub countdown()

Dim future As Date

future = DateAdd("n", 2, Now())

Do Until future _less than symbol_ Now()
DoEvents

ActivePresentation.Slides(1).Shapes("rectangle").TextFrame.TextRange = Format(future - Now(), "nn:ss")

Loop

End Sub

_The less than symbol is not allowed in a YouTube description_
--------------------------------------------------------------------------------
#powerpoint #powerpointtutorials

Microsoft Office 365, Beta Channel, Version 2107
---------------------------------------------------------------------------------
IF YOU LIKED THIS VIDEO YOU MAY ALSO LIKE:

[karinaadcock]

Sub countdown()

Dim future As Date

future = DateAdd("n", 2, Now())

Do Until future < Now()
DoEvents

= Format(future - Now(), "nn:ss")

Loop

End Sub

[bhatkiran]

Lovely video. Hourse of search and finally I got the best countdown timer VBA. Thanks for keeping it explanative and simple. A great help to me. 😘

[uselessgamer]

How about once I move onto a different slide, the countdown macro is still running. How can I stop it if the slide has changed?

[malejandrofdez]

Great video! This is what I was looking for. What code could I use if I wanted to insert a button to pause and restart the timer? I'm trying to create my own scoreboard.

[ede]

Nice! Two things: 1) How could you get the countdown to start as soon as the slide is opened--rather than having to click the box? 2) How can you pull a variable from an ActiveX text box where the user entered a number somewhere in the slideshow and have the countdown based on that variable?

[inhgiahuy]

em muốn gán âm thanh vào, đến khi đếm ngược kết thúc thì phát âm thanh lên ạ. cảm ơn chị ạ

[vikashsamaga]

Hi, thank you for the great video! I have one question - when the timer is counting down, the rest of the PowerPoint seems to come to a standstill, i.e. I'm not able to go to the next slide or click on any other buttons on the slide until the countdown has finished. Do you know how to avoid this issue?

[thequietroom]

Hi, love this very easy to understand tutorial, please may i ask - if i want the ticker to count down seconds until say 30th September 2023, what do i change, cant work out how to get an actual date into the box.

[nanceeverdeen]

Hello, Thank you so much for your VDO. It was awesome, finally something not Add-ins or thousands of objects with animations.

By the way, I can't link action to the macro. The "Run macro" option is not selectable for me. I changed settings in the Trust Center to enable all macros and restarted PPT and the laptop already. Do you know how I can fix this? TIA :)

[andresf.martinezm]

Gracias por la enseñanza, gran saludo desde Colombia.🟡🔵🔴 🙅‍♂

[mathewstw]

How do I display GMT Time running live in PowerPoint Slide?
Thank You in anticipation.

[erwinsmith]

please help me, i do not know why i can not save the timer. When I exit the powerpoint the Marco is reseted. How can I fix it, please help me

[achaparro]

Is there a way to use the timer without telling excel the number of the slide? My slide numbers constantly change.

[felicious]

Hi there, is it possible to implement that timer on the SlideMaster?

[uweexter]

is there an easy trick to count up the seconds and minutes instead of counting down ??

[khaledserwy]

Dear Karina
I need your help
I have a consultation in making a countdown to more than one shape in one side and I want to make it work at the same time, do you have an email or any other means of communication that I can send you the file
Kind Regards

[chisenvan]

How about once I move onto a different slide, the countdown macro is still running. How can I stop it if the slide has changed?