Sub Decompte()
Valeur = 100 'variable initialisée à 100
For i = Valeur To 0 Step -1
'mettre ici les opérations qui doivent être traitées au fur et à mesure du décompte
'*****************
Next i
End Sub
Merci beaucoup je chercher beaucoup plus compliquerBonjour,
Un exemple
CdltVB:Sub Decompte() Valeur = 100 'variable initialisée à 100 For i = Valeur To 0 Step -1 'mettre ici les opérations qui doivent être traitées au fur et à mesure du décompte '***************** Next i End Sub