Discussion :

[jlb59]

Bonjour à tous,

Je réalise un calcul sur un cumul comme ça :

Code :

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

Int(5 + (Int(Val(ItemJuste) * 100) / 59))

Arrivé à 100, c'est le nombre maximum que j'ai défini, le total est de 174 !
Ce qui me préoccupe, c'est que j'ai fait la même procédure de calcul avec Excel

Code :

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

=(5+100*100)/59

et celui-ci me donne un total de 170.

Je sais que la différence n'est pas énorme, mais je ne vois pas d'où pourrait provenir cette différence.

Pourriez-vous me dire pourquoi j'ai cette différence ?

Merci d'avance de votre aide.

[ProgElecT]

Salut

Pourriez-vous me dire pourquoi j'ai cette différence ?

Cela provient de l'enchainement de l'ordre des calculs intermediaires.
Pour avoir le même resultat il faut le forcer, par le biais de (...)

Code :

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

CInt((5 + (Val(ItemJuste) * 100)) / 59)

Dailleurs (5+100*100)/59 sous vb6 ne result pas 170 mais 169,576271186441, pour avoir 170 il faut formuler comme cela = CInt((5 + 100 * 100) / 59)

[jlb59]

J'avais bien mis "Int" et pour l'autre formule, c'est du Excel !

Que je mettre "Cint" ou "Int", il n'y a pas grande différence sauf peut-être l'arrondi du chiffre mais comme je ne veux pas arrondir au chiffre supérieur, j'ai choisi "Int" !

Avec Cint ou Int, si je veux avoir le même résultat qu'Excel, il faut que je divise par "60.5" et c'est pas bon du tout !

Qu'il y ait une différence après la virgule, soit, mais une différence de "4" c'est énorme :

[DarkVader]

La différence ne tient qu'au fait de ne pas utiliser la même formule dans les 2 cas.

[jlb59]

Non, tu as dû mal comprendre, ou je me suis mal expliqué (c'est plutôt ça).
Il n'y a qu'un seul calcul d'effectué et il est dans VB.

Le même calcul dans excel est juste pour un contrôle optique.
Comme il y a 100 questions, en VB il serait assez fastidieux de faire l'exécution 1 par 1.
C'est pour ça qu'excel est plus pratique car je peux ainsi voir que, par exemple, le N° 81 correspond à un calcul de 141, ou un autre ! Je peux ainsi définir la suite du prg.
Tu me suis là ?

[DarkVader]

Non pas du tout, mais pour moi

Code :

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

Int(5 + (Int(Val(ItemJuste) * 100) / 59))

et

Code :

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

=(5+100*100)/59

ce n'est pas la même opération

plutôt

Code :

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

Int(5 + Val(ItemJuste) * 100) / 59

[jlb59]

Oui, j'ai pigé, mais pour infos, ton dernier code est celui que j'ai mis dans VB. C'est vrai qu'il y avait un "Int" de trop, étant donné que "ItemJuste" est de type "Integer", je n'en voyais pas l'utilité.

Par contre, l'autre

Code :

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

=(5+100*100)/59

c'est celui avec Excel
Comme "Int" n'existe pas avec Excel, il faut faire un "Round" je crois mais sans certitude, ou formater la cellule, c'est plus simple.

[DarkVader]

.../...
Comme "Int" n'existe pas avec Excel

Depuis quand ?
D'autant que Int appartient à VBA.Conversion.

D'autre part, Round et Int ne sont pas équivalent:
Int renvoie la partie entière quand Round arrondi à la valeur sup ou inf en fonction de sa partie décimale.
(si c'était la même chose, il n'y aurait pas 2 fonctions différentes)

[jlb59]

Depuis quand ?
D'autant que Int appartient à VBA.Conversion.

Alors, on ne doit pas avoir la même version, parce que j'ai voulu faire ce calcul avec "int" mais Excel m'a dit que ça n'existait pas !
Je l'ai peut-être mal fait !

Bref, en tout cas, c'était pas mon prb !
En fait, j'ai posté pour savoir d'où pouvait venir une différence de calcul entre VB et Excel !
Certainement que j'ai eu la réponse, trop développée peu être !
Mais je vais m'en tenir à la méthode actuelle.

Merci et A+