formule en VBA pour arrondi au multiple

[C@thy]

Bonjour le forum,

je cherche une formule utilisable en VBA pour obtenir une variable nombre arrondie au multiple de 100,

j'ai écrit ceci :

nb = IIf(cells(i,j) mod 100 = 0, cells(i,j, 100 * (1 + cells (i,j) \100))

mais ça me donne un arrondi supérieur par exemple 46314 devient 46400 au lieu de 46300.😱

Auriez-vous une meilleure idée???😕

Merci à vous et bises nuageuses et un peu fraîches...

C@thy

 

[Compte Supprimé 979]

Re : formule en VBA pour arrondi au multiple

Coucou C@thy

Le code magique

nb = IIf(Cells(i, j) Mod 100 = 0, Cells(i, j), Int(Cells(i, j) / 100) * 100)

Bisous

 

[C@thy]

Re : formule en VBA pour arrondi au multiple

Merci beaucoup Bruno, c'est SUPERRRRR!!!

Bises et bonne journée,

C@thy

 

[JNP]

Re : formule en VBA pour arrondi au multiple

Bonjour le fil 🙂,
Pourquoi pas tout simplement

Application.WorksheetFunction.Round(46314, -2)

Bonne suite 😎

 

[C@thy]

Re : formule en VBA pour arrondi au multiple

Gné??? tout simplement, tu dis?😀

j'ai rien compris aux paramètres...🙄

edit : en plus, ça ne fonctionne pas avec le contenu de ma cellule i,j😕 il me faut une instruction qui récupère la valeur de cette cellule...😕

Bizz et merci à toi,

C@thy

 

[JNP]

Re : formule en VBA pour arrondi au multiple

Re 🙂,
Je ne comprends pas 🙁

i = 1
j = 1
Cells(i, j) = 46314
MsgBox Application.WorksheetFunction.Round(Cells(i, j), -2)

fonctionne parfaitement chez moi 🙄...
Pour les paramètres, ça revient à utiliser la formule de feuille

=ARRONDI(A1;-2)

Bonne suite 😎

 

[C@thy]

Re : formule en VBA pour arrondi au multiple

ah ouais!!! Je remplace 46314 par cells (i,j), et -2 par 100! Maintenant je comprends les paramètres!!!😉

Bizz

C@thy

 

[C@thy]

Re : formule en VBA pour arrondi au multiple

Ah ben non, c'est pas ça, il faut laisser -2 (pas compris pourquoi, mais ça marche!)

Par contre, ne fonctionne pas en 2003 (propriété ou méthode non gérée par cet objet)

Edit : si, ça maaaarche!😱

Merci à toi,😉😉😉

Bises

C@thy

 

[JNP]

Re : formule en VBA pour arrondi au multiple

Re 🙂,

Ah ben non, c'est pas ça, il faut laisser -2 (pas compris pourquoi, mais ça marche!)

Ben l'arrondi défini le nombre de décimales, donc -2 arrondi à la centaine 😛...
Bises 😎

 

[C@thy]

Re : formule en VBA pour arrondi au multiple

OK, ça y est, j'ai tout compris!!! Ouf!!!🙄🙄

Par contre, BrunoM45, ta formule (magique, au demeurant), me donne l'arrondi inférieur, pas l'arrondi au multiple ex. 41887 me donne 41800 au lieu de 41900 45295 me donne 45200 au lieu de 45300...

Bises

C@thy

 

[C@thy]

Re : formule en VBA pour arrondi au multiple

J'ai trouvé, BrunoM45, dans ta formule je remplace int par round, et le tour est joué!

Merci à vous tous,

bizz et bon appétit 🙂

C@thy