Bonjour à tous,

Dans un de mes programmes, pour faire une pause de 30 secondes, j'utilise la fonction :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Sub Wait(P_Seconde)
' Attendre P_Seconde secondes
Application.Wait Time + TimeSerial(0, 0, P_Seconde)
' Continuer après la pause
End Sub
Je voudrai modifier cette fonction pour qu'elle affiche un compte à rebours dans un userForm pendant l'attente ?

Merci d'avance pour votre aide.