Macro automatisch op bepaalde tijdstippen uitvoeren

[ronald1986]

Goedemiddag,

Ik heb onderstaande macro in een Excel bestand staan (in "ThisWorkbook"). De bedoeling is dat de macro "updaten" op deze tijdstippen wordt uitgevoerd. Het bestand wordt in principe nooit afgesloten. Nou heb ik het idee dat de macro wel werkt maar na een dag lijkt het bestand vast te lopen. Weet iemand hier misschien of de macro maar één enkele keer wordt uitgevoerd via onderstaande macro of zou dit iedere dag op deze tijdstippen moeten worden uitgevoerd? Of is er misschien nog een andere manier om hetzelfde doel te bereiken? Alvast bedankt voor het meedenken!

Private Sub Workbook_Open()

Application.OnTime TimeValue("06:00:00"), "updaten"
Application.OnTime TimeValue("12:00:00"), "updaten"
Application.OnTime TimeValue("20:00:00"), "updaten"

End Sub

 

[OctaFish]

Je opent een Werkboek maar één keer, dus de code wordt ook maar één keer uitgevoerd.

 

[ronald1986]

Ok, betekent dit dan dat de macro "updaten" één maal uitgevoerd wordt om 06:00, 12:00 en 20:00 en daarna niet weer om 06:00... enz...?

En als dat zo is, is er ook een manier om dit wel doorlopend uit te laten voeren iedere dag om 06:00, 12:00 en 20:00 zonder het bestand af te sluiten tussendoor?

 

[edmoor]

Je kan zoiets doen.
Dit in de ThisWorkbook sectie:

Private Sub Workbook_Open()
    StartTimers
End Sub

En dit in een module:

Sub StartTimers()
    Application.OnTime TimeValue("06:00:00"), "Updaten"
    Application.OnTime TimeValue("12:00:00"), "Updaten"
    Application.OnTime TimeValue("20:00:00"), "Updaten"
End Sub

Sub Updaten()
    If Hour(Time) = 20 Then StartTimers
    [COLOR="#008000"]'Hier de update code[/COLOR]
End Sub

 

[ronald1986]

Dankjewel hiervoor! Ik ga dit meteen toevoegen aan mijn bestand.