Comment créer un compte à rebours sous excel

Fermé
gcd47 Messages postés 67 Date d'inscription vendredi 2 janvier 2009 Statut Membre Dernière intervention 29 décembre 2014 - 25 janv. 2010 à 10:16
tompols Messages postés 1273 Date d'inscription jeudi 29 juillet 2004 Statut Contributeur Dernière intervention 25 novembre 2013 - 25 janv. 2010 à 11:49
Bonjour,

Je voudrais faire un compté à rebours sous excel. Qui pourrait m'aider pour faire ce programme?
A voir également:

1 réponse

tompols Messages postés 1273 Date d'inscription jeudi 29 juillet 2004 Statut Contributeur Dernière intervention 25 novembre 2013 435
25 janv. 2010 à 11:49
Salut,
tu peux utiliser la méthode Wait(), ex :
Sub decompte()
For i = 10 To 0 Step -1
    If Application.Wait(Now + TimeValue("0:00:01")) Then
        Range("A1").Value = i
    End If
    If i = 0 Then MsgBox "Feu !"
Next i
End Sub
5