Timer VBA

[zjiliber]

Ha allen,

Ik heb een macro die een sheet refresht. Deze sheet importeerd externe data. Dit importeren duurt enkele seconden.
Nadat deze data is geimporteerd wordt er ook nog (d.m.v. een macro) de omaak van een aantal cellen gewijzigd.
Nu wil ik deze bijde macro's samenvoegen onder 1 button.

Maar, omdat het importeren van de externe data enkele seconden duurt is de 2e macro al uitgevoerd. Is het mogelijk dat ik tussen bijde stukken code een timer plaats die enkele seconden wacht met het uitvoeren van het 2e gedeelte code?

Alvast bedankt!

 

[Roncancio]

Via Application.OnTime kan dit.

Bijv.

Sub Wachten()
WachtTijd = Now + TimeValue("00:00:05")
Application.OnTime WachtTijd, "VolgendeCode"
End Sub

Sub VolgendeCode()
MsgBox "oke"
End Sub

Na 5 seconden verschijnt het bericht "oke"

Met vriendelijke groet,


Roncancio

 

[zjiliber]

na 5 seconden wordt idd de melding "oke" gegevenen, maar het 2e gedeelte van de code wordt niet aangeroep/uitgevoerd...

Welke code moet ik er aan toevoegen?

Kheb het al gevonden...

Thank's Roncancio!!