• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: Tlačítka START a STOP

Zaslal/a Jan.PRAHA 1.5.2014 10:00

Ahoj všem nadšencům excelu mám na Vás prosbu. Mám tlačítko START a potřebuji jakmile ho zmáčknu tak se zpustil čas ( ale kdybych ho zmač po druhy tak aby se uz nic nestalo cas by normalne bezel) a pak tlačítko STOP které když zmáčknu tak se čas zastaví (ale kdyz ho zmacknu po druhy tak aby se nic nestalo) momentalne mi to hazi chybu a nevim co s tim.
Tady jsou řádky

Šešit1:

Sub Count()

PauseTime = 1
Start = Timer
Do While Timer < Start + PauseTime
DoEvents
Cells(1, 1) = (Start + PauseTime) - Timer
Loop
End Sub
Private Sub CommandButton1_Click()
startTimer

End Sub
Private Sub CommandButton2_Click()
stopTimer
End Sub

Modul1:

Sub startTimer()
Application.OnTime Now + TimeValue("00:00:01"), "Increment_count"
End Sub

Sub Increment_count()
Range("A1").Value = Range("A1") + 1
startTimer
End Sub

Sub stopTimer()
Application.OnTime Now + TimeValue("00:00:01"), "Increment_count", Schedule:=False
End Sub

Zaslat odpověď >

---

Opičák(1.5.2014 13:51)#019221

Tak to udělejte tak, že nelze zmačknout podruhý. viz příloha

Příloha: 19221_timer.zip (21kB, staženo 24x)

citovat

Jan.PRAHA(1.5.2014 15:33)#019223

Díky moc to je super citovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

Formulář Faktura

Helios iNuvio

On-line nástroje