XL 2021 Pause dans VBA

[stefb1968]

Bonjour à tous,

je mets en place un tirage aléatoire pour organiser une tombola. J'ai enregistré une macro qui exécute le tirage de mes numéros en cliquant sur le bouton mais j'aimerai qu'ils n'apparaissent pas tous en même temps. Environ 1 seconde entre chaque numéro.
J'ai essayé avec la fonction Sleep dans VBA mais sans succès.
Une personne pour m'aider avec le fichier ci-joint?
Merci d'avance!

 

[sylvanu]

Bonjour Stefb,
Peut être en ajoutant après chaque End With ( sauf le dernier ):

' Attente de 1 seconde
Application.Wait Time + TimeSerial(0, 0, 1)
' Reprise du code

 

[stefb1968]

Bonjour Stefb,
Peut être en ajoutant après chaque End With ( sauf le dernier ):

' Attente de 1 seconde
Application.Wait Time + TimeSerial(0, 0, 1)
' Reprise du code

Bonjour Sylvanu,

ça marche nickel! Trop top. Merci beaucoup 😉

​