ou i varie de 1 à 200 doc hauteur varie de 1100 à 60800
j'ai déclaré ma variable hauteur de la manière suivante :
Dim hauteur As Long
mais j'ai toujours une erreur de dépassement de capacité.
Si quelqu'un voit mon prblème, merci d'avance!
Dim hauteur As Long
For i = 1 To 200
hauteur = 300 * i + 800
Debug.Print hauteur
Next
'Marche très bien...
En revanche pour le reste c'est foireux !!
Comme quoi VB c'est bien pour manipuler des chaines de caractères mais pas des chiffres !!
@+, VIC
Dim hauteur As Long, i As Long
Do While i < 201
i = i + 1
hauteur = 300 * i + 800
Debug.Print hauteur
Loop
Encore moi...
une variable de type integer est comprise entre
-32 768 et 32 767
Comme le résultat final est 60800 c'est > à la capacité de i si i est un integer.
Ce qui veut dire aussi que i qui est supposer être entre 1 et 200 prend en fait la valeur de Hauteur...
Donc si on écrit :
Dim hauteur As Long, i As Long
Do While i < 201
i = i + 1
hauteur = 300 * i + 800
Debug.Print hauteur
Loop
ça marche aussi !!
@+; VIC