[RESOLU]Lancement userform

[MBONGA MBALI]

Bonsoir Forum
Bonsoir a tous et a toutes
est ce que je peux afficher ces 10 userforms succesivement
usf1 apres par exemple 5 secondes s'affichera l'usf2 ensuite apres la meme periode s'affichera l'usf3 et ainsi de suite jusqu'au l'usf10.
j'ai fais un code dans (thisworkbook) mais j'ai bloque apres.
merci d'avance pour votres suggestions et idees.
cordialement
MBALI

 

[Roland_M]

Re : Lancement succesivement de 10 userform

Bonsoir,

tu peux mettre dans chacun ceci:
Private Sub UserForm_Activate()
T! = Timer: While Abs(Timer - T!) < 5: DoEvents: Wend: Unload Me
End Sub

 

[MBONGA MBALI]

Re : Lancement succesivement de 10 userform

Bonsoir,

tu peux mettre dans chacun ceci:
Private Sub UserForm_Activate()
T! = Timer: While Abs(Timer - T!) < 5: DoEvents: Wend: Unload Me
End Sub

Bonsoir Roland_M
c'est effectivement ce que je veux faire
merci beaucoup
c'est bien resolu
cordialement
MBALI