Wiederholter Programmaufruf
21.11.2006 09:27:59
Christof
Ich möchte gerne eine Routine wiederholt nach X Min aufrufen.
Dazu benutze ich im moment folgendes Programm:
Sub auto_open()
Zeitspanne = Now + TimeValue("00:13:00")
Application.OnTime Zeitspanne, "test"
End Sub
----------------------------------------
Sub test()
'Das zu wiederholende Progamm
Call auto_open
End Sub
Das Funktioniert auch soweit aber meistens gegen Mitternacht
macht er einfach nicht weiter.
Weiß jemand woran das liegen könnte bzw. wie man das Problem behebt?
Vielen Dank jetzt schon für die Hilfe!
Gruß
Christof