cs_Aurelie75
Messages postés9Date d'inscriptiondimanche 31 août 2003StatutMembreDernière intervention12 décembre 2008 9 sept. 2003 à 21:30
J'allais donner le même code que toi avec la fonction Int()
Il faut juste faire attention dans le cas ou tu traiterais des nombres négatifs, car la valeur entière d'un nombre négatif n'est pas identique au nombre formé par les chiffres avant la virgule.
Exemple Int(-1,02) = -2
Donc ajouter un test du type :
If vNombreATraiter >= 0 then
vPartieEntiere = Int(vNombreATraiter)
ElseIf MyVar < 0 then
vPartieEntiere = Int(vNombreATraiter) + 1
EndIf