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"
und dann soll dasselbe noch einmal in einer zelle etwas anders dargestellt werden.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)
etwas weiter unten steht Application.Wait laufzeit
wäre toll wenn ihr da vielleicht einen lösungsansatz oder gar eine lösung hättet.bereits jetzt schonmal ein danke für die hilfe