Notifications
Clear all

Como criar uma planilha com esse cronômetro?

16 Posts
2 Usuários
0 Reactions
3,035 Visualizações
(@nikaway)
Posts: 27
Eminent Member
Topic starter
 

Pessoal, estou precisando criar um cronômetro dentro da minha planilha de estudos, e quero que esse cronômetro inicie em uma contagem até 25 minutos.

E quando chegar a esse tempo de 0 a 25 minutos, que toque um alarme (som.mp3) e ele continuar contando até 30 min e tocar de novo o alarme e depois de 30 minutos zerar o tempo,
e só quando a pessoa clicar de novo em Play continuar esse mesmo ciclo?.

Ou seja quero que toque um beep em 25 minutos e em 30 minutos e depois disso o alarme volte a zero.

E quero que haja o botão de Play, Pausa e Stop, assim:

 
Postado : 12/03/2016 11:06 pm
(@nikaway)
Posts: 27
Eminent Member
Topic starter
 

Estou tentando fazer com que o cronômetro comece do zero quando o usuário clicar pra fechar no botão de Form que aparece, então colei o código da macro "Start_timer" do cronômetro, dentro da propriedade do botão, assim:

Private Sub btnFecha5min_Click()
Start_timer:
    dteStart = Time
    boolStopPressed = False
    boolResetPressed = False
Timer_Loop:
    DoEvents
    dteFinish = Time
    dteElapsed = dteFinish - dteStart + dteStopped
    If Not boolStopPressed = True Then
        
        Worksheets("Segunda").Label1.Caption = dteElapsed
        sdta = dteElapsed
Unload form5min
End Sub

Mas dá esse erro:

"Erro de compilação, Bloco If sem End If"

Não sei o local certo para colocar, e se a macro está certa dentro do botão... :/

 
Postado : 22/03/2016 11:47 am
Página 2 / 2