Countdown-Timer Excel-VBA - Code excel abgestürzt
Könnte jemand bieten einen Einblick in, warum dies stürzt mein excel, ich kann nicht scheinen, um es herauszufinden.
Im Versuch, erlernen von VBA und brauche einige Ratschläge.
sub timer()
dim second
second = 1.15740740740741e-05
'this is the amount excel counts as a second
line1:
application.wait "00:00:01"
Range("a1").value = Range("a1").value - second
if not range("D2").value = 0 then
Goto line1
else
Msgbox("Countdown ended")
End if
end sub
- Was ist A1's anfänglichen Wert?? Wie werden die A1 und D2 verwandt??
- OMG im so ein Depp....
- A1 = 00:00:30 , D2 sollte A1 sein ..... ich habe auch das warten auf Anwendung.Warten Jetzt + TimeValue("0:00:01")
Du musst angemeldet sein, um einen Kommentar abzugeben.
Ich bin sicher, dass Sie nicht timing space shuttle startet oder alles, was kritisch ist. Aber wenn Sie wollen, um sicherzustellen, dass Ihre countdown dauert nicht länger als 30 Sekunden, können Sie mit der Timer-Funktion. Hier ist ein Beispiel.
Wenn es nur um Countdown-jede Sekunde, ich denke, es ist eine weitere option, um eine Timer-Funktionalität in Excel.
Versuchen Sie eine Suche für eine Anwendung.OnTime-Funktion in Excel, die es uns ermöglicht haben Timer in Excel. Verwandte Artikel, der erläutert, wie der timer in Excel und ein makro ausführen, während einer geplanten Intervall.
Dies ist der beste Weg, dies zu tun.
Versuchen, diesen code unter: