|
Guten Abend
Ich habe im Excel ein Makro mit "Application.OnTime TimeValue" gebaut. Die Absicht war, dass 15 Sekunden nach jeder vollen Minute ein weiteres Makro ausgeführt wird, was wie folgt aussieht:
Sub Crawler_Timer1()
Application.OnTime TimeValue("00:01:15"), "Crawler_Prod"
Application.OnTime TimeValue("00:02:15"), "Crawler_Prod"
Application.OnTime TimeValue("00:03:15"), "Crawler_Prod"
Application.OnTime TimeValue("00:04:15"), "Crawler_Prod"
Application.OnTime TimeValue("00:05:15"), "Crawler_Prod"
Application.OnTime TimeValue("00:06:15"), "Crawler_Prod"
Application.OnTime TimeValue("00:07:15"), "Crawler_Prod"
Application.OnTime TimeValue("00:08:15"), "Crawler_Prod"
....
Die Erstellung war etwas aufwendig, aber im Excel funktionieren ja solche Generierungen problemlos. Weil ich aber mit einem einzelnen Makro für 24 Stunden die KB-Beschränkung erreicht habe, musste ich zwei Markos erstellen. Diese beiden werden mit einem weiteren Makro aufgerufen:
Sub Crawler_Timer()
Call Crawler_Timer1
Call Crawler_Timer2
End Sub
Das funktioniert gut. Jedoch funktioniert es nur genau 24 Stunden "gut". Das Makro läuft nur einmal durch. Weiss jemand wie ich die Makros dazu bringe unendlich zu laufen?
Danke und Gruss
Forelli
|