On time werkt niet

[Tetaphidoep]

Ik heb een programma draaien in Excel die elke dag een tabblad op moet slaan op een vaste tijd, daarna wist hij de inhoud van een kolom. Zodat deze weer gevuld kan worden met data uit het programma.

Ik heb de volgende Macro gemaakt:

Sub RunOnTime()

Application.OnTime TimeSerial(0, 15, 0), "opslaan"
Application.OnTime TimeSerial(0, 20, 0), "WisKolom"

End Sub

De Macro wordt niet herhaald, wat mis ik in deze formule?

 

[HSV]

Als het bestand altijd openstaat.

Boven 'End Sub' toevoegen.

application.ontime timevalue("23:59:00"), "runontime"

 

[AHulpje]

@HSV

Totdat je stack na een paar duizend recursieve aanroepen volloopt. Maar dat duurt een paar jaar.

 

[snb]

zie:

https://www.snb-vba.eu/VBA_Application.OnTime.html

 

[HSV]

Gratis is voor niets.