Calcul Modulo

Bonjour

j'ai une petite question sur le calcul modulo, si je souhaite calculer a=(4-17) mod 8 , cela pourrait se simplifier en a= -13 mod 8 soit aussi a= -5 mod 8 et comme 5 = 8-3 alors 5 congru à -3 [8] et donc finalement a =3[8] ( a congru à 3 modulo 8) , vba s'arrete dans le calcul à : a= -5 mod 8 existe t il une fonction sous vba qui permette d'aller directement à un reste positif sans avoir à taper

par exemple :

 a= inputbox("saisir la valeur de a:")
 b= inputbox("saisir la valeur de b:")
if a-b > 0  then 
msgbox  (a-b) mod  8
else
msgbox  (8-(a-b)) mod  8
end if

En vous remerciant.

Bonjour rocket4,

peut-être comme ça :

Sub Essai()
  a = InputBox("saisir la valeur de a:")
  b = InputBox("saisir la valeur de b:")
  If b > a Then c = a: a = b: b = c
  MsgBox (a - b) Mod 8
End Sub

dhany

Merci Dahny, du coup je viens de penser à utiliser la valeur absolue

abs(a-b) mod

8

ah oui, c'est une très bonne idée aussi ! bravo !

et merci d'avoir passé l'sujet en résolu !

dhany

Rechercher des sujets similaires à "calcul modulo"