a Mod b et Mod(a;b)

Le
Tatanka
Bonsoir, Bonsoir,

Pour deux « grands » nombres entiers positifs
a et b, VBA n'arrive pas à calculer a Mod b alors
que la fonction Excel MOD(a;b) y parvient.
Pourquoi en est-il ainsi ?

En A1 : 109 999 989
En B1 : 22 000 034 133
Ailleurs : = MOD(A1;B1)

Sub a_Mod_b()
Dim a As Double, b As Double
a = [a1]: b = [b1]
MsgBox a Mod b
End Sub

Serge
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
MichDenis
Le #5070531
La gang qui a développé l'interface de la feuille de calcul
et celle qui a développé l'interface de l'éditeur de code
sont 2 équipes différentes -> qui probablement ne se
connaissent même pas !!! c'est ce qui explique certaines
différences entre les 2 interfaces.


x = [MOD(25,9)]

Nombre = 25
N = 3
e = Evaluate("mod(" & Nombre & "," & N & ")")
Est-ce que la méthode "Evaluate" est aussi performante que [ ] ? à toi de tester !




"Tatanka"
Bonsoir, Bonsoir,

Pour deux « grands » nombres entiers positifs
a et b, VBA n'arrive pas à calculer a Mod b alors
que la fonction Excel MOD(a;b) y parvient.
Pourquoi en est-il ainsi ?

En A1 : 109 999 989
En B1 : 22 000 034 133
Ailleurs : = MOD(A1;B1)

Sub a_Mod_b()
Dim a As Double, b As Double
a = [a1]: b = [b1]
MsgBox a Mod b
End Sub

Serge
Tatanka
Le #5068161
Salut Denis,

Merci de ces précieux renseignements.

Serge



"MichDenis"
La gang qui a développé l'interface de la feuille de calcul
et celle qui a développé l'interface de l'éditeur de code
sont 2 équipes différentes -> qui probablement ne se
connaissent même pas !!! c'est ce qui explique certaines
différences entre les 2 interfaces.


x = [MOD(25,9)]

Nombre = 25
N = 3
e = Evaluate("mod(" & Nombre & "," & N & ")")
Est-ce que la méthode "Evaluate" est aussi performante que [ ] ? à toi de tester !




"Tatanka"
Bonsoir, Bonsoir,

Pour deux « grands » nombres entiers positifs
a et b, VBA n'arrive pas à calculer a Mod b alors
que la fonction Excel MOD(a;b) y parvient.
Pourquoi en est-il ainsi ?

En A1 : 109 999 989
En B1 : 22 000 034 133
Ailleurs : = MOD(A1;B1)

Sub a_Mod_b()
Dim a As Double, b As Double
a = [a1]: b = [b1]
MsgBox a Mod b
End Sub

Serge





Publicité
Poster une réponse
Anonyme