Affichage des images dans un userform

[kiki44]

Bonjour,

Je cherche à faire une petite animation avec des images de carte de jeux, afin de simuler une distribution de plusieurs cartes.

J'affiche des carte à l'aide d'une boucle.

Le problème est que les cartes s'affichent toute en même temps à la fin de la boucle et non à chaque itération, même en mettant une temporisation entre chaque itération.

J'ai cherché une solution sur les forums, mais je n'est pas trouvé de solution.

J'ai essayer de faire la même animation directement dans une feuille Excel, mais j'ai eu le même problème.

Existe t'il une solution SVP.

je joins un fichier Zip avec 4 images et un fichier Excel de test pour mieux comprendre ce que je cherche à faire

 

[fhoest]

Re : Affichage des images dans un userform

Bonsoir,
l'instruction doevents redonne la main au systeme.

Sub Pause()
DoEvents
Tpm1 = Timer

Do
Tpm2 = Timer

Loop While Tpm2 < Tpm1 + 0.4

End Sub

A+

 

[kiki44]

Re : Affichage des images dans un userform

Merci Fhoest pour ta réponse qui correspond à ma demande.

@ + kiki44