Dépassement d'une valeur

cs_zitoun Messages postés 14 Date d'inscription lundi 16 septembre 2002 Statut Membre Dernière intervention 20 août 2009 - 14 nov. 2002 à 14:39
cs_rodrigos Messages postés 84 Date d'inscription jeudi 24 janvier 2002 Statut Membre Dernière intervention 4 avril 2006 - 14 nov. 2002 à 15:08
Bonjour à tous,

Dans une cellule EXcel, j'aimerai limiter la valeur d'une cellule à 125. Cependant, un calcul est fait dans cette cellule, que puis je mettre comme code
pour que le calcul s'arrette au chiffre en dessous de 125. Acutellement j 'ai ce code la mais il prend la valeur au dessus de 125, et s'arette :

Do
numéro = numéro + 1
Range("c9") = (Range("b5") * numéro) + 20
Range("c10") = (Range("c9") / 1000) * Range("b4") * Range("e6")
If Range("c10") > 125 Then
Exit Do
End If
Loop

Merci d'avance

2 réponses

ElDoktor Messages postés 22 Date d'inscription samedi 2 novembre 2002 Statut Membre Dernière intervention 7 décembre 2002
14 nov. 2002 à 15:08
Suffit de verifier si le calcul de c10 est superieur a 125, si j'ai bien compris:

Do
numéro = numéro + 1
Range("c9") = (Range("b5") * numéro) + 20
z= (Range("c9") / 1000) * Range ("b4") * Range("e6")
if z > 125 Then
Exit Do
else
Range("c10") = z
End If
Loop
0
cs_rodrigos Messages postés 84 Date d'inscription jeudi 24 janvier 2002 Statut Membre Dernière intervention 4 avril 2006 2
14 nov. 2002 à 15:08
au lieu de mettre
If Range("c10") > 125 Then
tu devrais mettre
If Range("c10") >= 125 Then

La je pense que ton prog marchera : il s'arrêtera dès que Range("c10") sera = à 125

Tiens moi au courant!!
0
Rejoignez-nous