Countdown timer beep under 10 seconds.

werdllaw · Aug 22nd 2018

I have created a timer in excel. I would like it to beep every second under ten seconds. I have tried the follow method but the beep is happening every second instead of only playing under ten seconds.

VBA module:
Function BeepMe() As String
Beep
BeepMe = ""
End Function

In Sheet2 Cell B2 I have my timer 12:01:30 AM formatted to display mm:ss

in cell c2 I have this function =IF(B2<"12:00:10",BeepMe()."")

Please advise how to only play the beep under 10 seconds.

Thank you

John_w · Aug 23rd 2018

Try this formula:

=IF(B2<TIMEVALUE("00:00:10"),BeepMe(),"")

ashu1990 · Aug 23rd 2018

assuming you have timer in Cell B2 running the below code will work

Code

Function BeepMe() As String
tim = Range("B2").Value


Do Until Range("B2").Value = (tim + TimeValue("00:00:10"))
DoEvents
Loop
Beep
BeepMe = ""




End Function

Display More

werdllaw · Aug 24th 2018

Quote from John_w

Try this formula:

=IF(B2<TIMEVALUE("00:00:10"),BeepMe(),"")

This worked perfectly! Thank you.

Countdown timer beep under 10 seconds.

Participate now!

Share