Beste allemaal,
Ik heb een bestand met Formulieren gemaakt. Nadat ik dit formulier laat invullen wil ik een code laten lopen. Deze code duurt even en om geen problemen te krijgen wil ik graag een pop-up formulier laten zien met daarop zeer groot dat er gewacht moet worden. (Formulier "Wait_a_moment"). Echter wil ik nadat "Wait_a_moment_please" zichtbaar wordt dat er wordt doorgegaan met de code. Anders moet ik meerdere formulieren gaan maken met "Wait_a_moment_please"...
Iemand een idee hoe en of dit kan??
Helaas kan ik het bestand niet toevoegen.
De code ziet er als volgt nu uit:
Ik heb een bestand met Formulieren gemaakt. Nadat ik dit formulier laat invullen wil ik een code laten lopen. Deze code duurt even en om geen problemen te krijgen wil ik graag een pop-up formulier laten zien met daarop zeer groot dat er gewacht moet worden. (Formulier "Wait_a_moment"). Echter wil ik nadat "Wait_a_moment_please" zichtbaar wordt dat er wordt doorgegaan met de code. Anders moet ik meerdere formulieren gaan maken met "Wait_a_moment_please"...
Iemand een idee hoe en of dit kan??
Helaas kan ik het bestand niet toevoegen.
De code ziet er als volgt nu uit:
Code:
Private Sub cmdinvul_Click()
Wait_a_moment_please.Show 'en dan terugkeren naar Sub cmdinvul_Click()
'HIER volgt de gehele code welke moet doorlopen!!
Sheets("BSTG").Activate
Application.ScreenUpdating = False
'Hierna wil ik Wait_a_moment_please laten unloaden
Unload Wait_a_moment_please
Unload Me
End Sub