Sluiten werkboek na afloop countdown timer werkt niet.

Hallo,

Volgende timer gevonden op Excel Forum.com. Ik hoop dat mijn vraag hier op de juiste plaats staat,

Probleem: Bij afloop van de tijd sluit het Userform en zou het werkboek ook moeten sluiten. Hier stopt Excel telkens met werken.
Kan dit aangepast worden in de code dat dit werkboek sluit na afloop tijd of moet ik het over een andere boeg gooien?


Alvast bedankt
M.v.g.

Marc

Logisch dat 'ie stopt bij ThisWorkbook.Close.
Je sluit het werkboek, dus ook het dan lopende VBA project.

Edmoor, bedankt voor je reactie.

Wat ik niet begrijp is dat als ik via de command button Done ( Call CloseUserForm1) op het userform vraag, om zelfs tijdens de lopende timer het werkboek te sluiten, dit wel direct werkt zonder fouten. Hier wordt dan toch ook gebruik gemaakt van dezelfde ( ThisWorkbook.Close SaveChanges:=False ).
Op deze manier wordt toch ook een lopend VBA project onderbroken, of niet?

Na afloop van de timer wordt dezelfde code aangeroepen als met de knop en hier stop Excel met werken.

Wat ik ook heb getest is als je Application.Quit gebruikt inplaats van ThisWorkbook.Close, Excel wel direct sluit zonder fouten na afloop van de timer. Maar als er dan andere werkboeken openstaan sluiten deze ook mee en dat is niet de bedoeling.

Toch nog bedankt.
Marc