ApplicationOnTime

folgendes Problem:

mit folgendem Code rufe ich verschiedene Prozeduren zu best. Zeitpunkten auf.

Private Sub Workbook_Open()
Application.OnTime TimeValue("22:30:00"), "Stundenauswertung.Stundenauswertung"
End Sub

Das Problem ist, dass der Code logischerweise nur einmal ausgeführt wird (an einem Tag und nicht wie beispielsweise am wochenende an drei Tagen)

Hatte vielleicht jemand schon einmal ein ähnliches Problem und konnte dieses lösen?

Vielen Dank im Voraus

benny