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
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
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