Discussion :

[Lonely1]

Salut à tous,

Voici un exemple de code étonnant.
Le problème c'est que la fonction Int() donne un mauvais résultat pour un calcul très simple. selon ce code ci-après la valeur de X devrait être égal à 24 alors que la fonction Int() calcule 23!!!
Franchement, une chose bizarre que je ne comprends pas.
Pourriez-vous m'explique le pourquoi!!?
Un grand merci.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Sub Test()
    A1 = 64
    A2 = 40
    M = 4
    X = Int(A1 + M / 12 - (A2 + M / 12))
    Cells(1, 1) = X
End Sub

[decondelite]

Bonjour.

Si on enlève la paire de parenthèse interne, on obtient bien 24 et pas 23. SI tu mets les valeurs de tes variables et non pas les variables, là encore tu obtiens 24 et non plus 23.
Mon avis: déclare tes variables avec un type bien défini, car là ce sont des variants, et pour tout te dire c'est pas très recommandé dans les calculs...

[Qwazerty]

Salut
Tu peux aussi utiliser Round, qui lui ne semble pas commetre "d'erreur de calculs"
++
Qwaz

[decondelite]

Round ne sert pas à la même chose que Int, et je suppose qu'il ne s'agissait que d'un cas d'application précis...

En tout cas Excel et VBA, desfois on tombe sur des bizarreries qu'on ne peut s'expliquer. Mais là à part le coup du typage et des méthodes de calcul interne je ne vois rien d'autre.

[Gorfael]

Salut Lonely1 et le forum
Avant de critiquer, prenez la peine de regarder l'aide de la fonction en VBA
x = Int(10.1) => x=10
x = Int(-10.1) => x=-11
x = Fix(10.1) => x=10
x = Fix(-10.1) => x=-10
C'est du à la signification de INT() (ENT() sous Excel) qui est différente de Fix() (Tronque())
A+

[Qwazerty]

Et?
La peine avait été prise, mais même avec ses infos la, le nombre produit étant positif, le résultat devrait être 24.
Pour ma part je pense qu'il faut voir comment vba interprète les calculs et les priorités, peut être distribue t il la fonction en faisant un truc du gens.. mais la c vraiment qu'une supposition suppositoire ^^

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

x = Int(A1 + M / 12) + Int(-A2 - M / 12)

A++
Qwaz

[decondelite]

Dites-vous bien qu'un ordinateur ne calcule pas comme nous on le fait, et que cela peut parfois amener à des résultats qui nous paraissent aberrants à nos yeux, alors que c'est bel et bien le résultat de l'algorithme qui se cache derrière.

[Lonely1]

Merci bien à vous tous pour vôtre réactions.
En fait, le code que j'avais posté c'est une simplification d'une partie de mon programme d'une boucle. Et par hasard, la fonction Int() "se trompe" uniquement quand :
A1 = 64
A2 = 40
M = 4.

Apparemment, decondelite a raison. En effet, c'est une question de déclaration de variable.
Conclusion : Afin d'éviter les surprises et les "bizzaroides" il est préférable de déclarer chaque variable par le type approprié.
a+