Bonjour Ben, Bruno, le Forum
Alors, Ben on garde ses petits secrets...
Avec une boucle (pause de 5 secondes):
Tempo = 5
Start = Timer
Do While Timer < Start + Tempo
Loop
-----------------------------------------------------------
ou avec Wait (pause de 10 secondes):
Application.Wait Now + TimeValue("00:00:10")
Bonne journée
PhiBou