Countdown in Zelle von Application.wait/ontime
26.07.2014 21:56:18
Application.wait/ontime
kleine Frage zu Application.wait bzw. Application.ontime
Gibt es eine Möglichkeit das man die Zeiten als Countdown herunterzählen lässt
und dies visuell in einer Zelle darstellen kann?
theoretisch soll, immer angezeigt werden, wann die nächste
präsentation anfängt....
hier mal der dafür genutzte code
praesent2 = Now + TimeValue(Sheets("Overview").Range("C11").Value & ":" & Sheets("Overview"). _
Range("D11").Value & ":" & Sheets("Overview").Range("E11").Value)
Application.OnTime praesent2, "Run_P2"
jetzt geht es aber um einen countdown, wielange die präsentation bzw. einblendung dauert...
der code aktuell schaut so aus...
laufzeit = Now + TimeValue(Sheets("Overview").Range("C12").Value & ":" & Sheets("Overview").Range("D12").Value & ":" & Sheets("Overview").Range("E12").Value)
Application.Wait laufzeit
bereits jetzt schonmal ein danke für die hilfe
Anzeige