Angelo7891
XLDnaute Junior
Bonjour le forum ;
alors voila dans un tableau j'ai plusieur valeur numérique et je fais certaines opérations et je comprend pas le résultat 8O
voici mon code :
par exemple au premier tour de boucle:
les 2 premiers msgbox ne sont pas pris en compte car dans la case C8 ne contient pas la valeur 0
le 3ieme msgbox affiche bien la valeur qu'il y a dans la case C8 (2 en l'occurence)
le 4ieme msgbox affiche bien la valeur qu'il y a dans la case B8 (3 en l'occurence)
or le 5 ieme msgbox(qualité) me renvois 1 et c'est ca que je comprend pas
de plus j'ai insérer cette macro dans un autre classeur et j'obtient bien une qualité de 0,6677(2/3) pour le premier tour de boucle donc la je comprend vraiment pas
alors voila dans un tableau j'ai plusieur valeur numérique et je fais certaines opérations et je comprend pas le résultat 8O
voici mon code :
Code:
For colonne2 = 2 To NbColonne - 2 Step 2
If Cells(8, colonne2 + 1).Value = 0 Then
MsgBox ('C8: ' & Cells(8, colonne2 + 1).Value)
MsgBox ('B8: ' & Cells(8, colonne2).Value)
qualité = 1
Else
MsgBox ('C8 : ' & Cells(8, colonne2 + 1).Value)
MsgBox ('B8 : ' & Cells(8, colonne2).Value)
qualité = Cells(8, colonne2 + 1).Value / Cells(8, colonne2).Value
MsgBox ('qualité=' & qualité)
End If
Cells(9, colonne2).Value = qualité
Next colonne2
par exemple au premier tour de boucle:
les 2 premiers msgbox ne sont pas pris en compte car dans la case C8 ne contient pas la valeur 0
le 3ieme msgbox affiche bien la valeur qu'il y a dans la case C8 (2 en l'occurence)
le 4ieme msgbox affiche bien la valeur qu'il y a dans la case B8 (3 en l'occurence)
or le 5 ieme msgbox(qualité) me renvois 1 et c'est ca que je comprend pas
de plus j'ai insérer cette macro dans un autre classeur et j'obtient bien une qualité de 0,6677(2/3) pour le premier tour de boucle donc la je comprend vraiment pas