Option ausdrücklich
Allgemeines dTime als Datum
Privates VorWorkbook_Open ()
Anruf ValueStore
Enden-Unterseeboot
VorValueStore ()
Schwaches dTime als Datum
Strecke („jetzt“). Formel = „=VLOOKUP (ZEIT (STUNDE (JETZT ()), MINUTE (JETZT ()), ZWEITES (JETZT ())), Sheet2! $A$4: $Q$1444,16) +VLOOKUP (ZEIT (STUNDE (JETZT ()), MINUTE (JETZT ()), ZWEITES (JETZT ())), Sheet2! $A$4: “
Strecke („Now_Plus_15“). Formel = „=VLOOKUP (ZEIT (STUNDE (JETZT ()), MINUTE (JETZT ())+15, ZWEITES (JETZT ())), Sheet2! $A$4: $Q$1444,16) +VLOOKUP (ZEIT (STUNDE (JETZT ()), MINUTE (JETZT ())+15, ZWEITES (JETZT ())), Sheet2! $A$4: “
Anruf StartTimer
Enden-Unterseeboot
VorStartTimer ()
dTime = jetzt + TimeValue („00: 01: 00“)
Application.OnTime dTime, „ValueStore“, Zeitplan: =True
Enden-Unterseeboot
VorStopTimer ()
Auf Störungs-Zusammenfassung zunächst
Application.OnTime dTime, „ValueStore“, Zeitplan: =False
Enden-Unterseeboot
|