Arrondi de chiffre

[tvhabdo]

Bonjour tous .. besoin d'un ch'ti coup de main, moi...

J'explique :

En A1 je tape 126000 j'applique un coef (resultat en B1) 128920
En A2 je tape 54800 j'applique un coef (resultat en B2) 56296
En A3 je tape 84150 j'applique un coef (resultat en B3) 86233

et je souhaiterais
que le chiffre en B1 128920 soit arrondi a 128900
que le chiffre en B2 56296 soit arrondi a 56300
que le chiffre en B3 86233 soit arrondi a 86200
c'est a dire arrondi a la centaine sup. ou inf
Merci a tous pour votre aide - Patrick

 

[jeanpierre]

Re : Arrondi de chiffre

Bonjour tvhabdo, re le forum,

=ARRONDI(A1;-2)

si ta valeur est en A1

En jouant sur -2, -1, 0, 1, etc, tu peux faire beaucoup de chose

A te lire dans tes expériences.

Jean-Pierre

Edit : Salut Lionel, pas vu non plus et pour cause, en même temps.... (de plus, je ne peux plus éditer sans me faire ejecter du navigateur.. pas glop)

 

[GPLIONEL]

Re : Arrondi de chiffre

Bonjour TVhabdo

en considérant ton chiffre en a1 :
=ENT(ARRONDI(A1/100;0))*100

Oups collision avec JP que je salue.

 

[JHA]

Re : Arrondi de chiffre

Bonjour Tvhabdo, le forum,

Essaie =ARRONDI.AU.MULTIPLE(56296;100)

JHA

 

[tvhabdo]

Re : Arrondi de chiffre

Z"etes des bête les mec's...

Merciiiiiiii à bientôt

Bon Week a tous - Patrick

 

[jeanpierre]

Re : Arrondi de chiffre

Re Patrick et tous,

Des bêtes, non, simplement un peu de patience et de recherche dans les fonctions fx,ici, dans la barre d'outils Standard, par exemple....

Bon WE également.

 

[tvhabdo]

Re : Arrondi de chiffre

Bon .. je reviens MAIS j'ai oublié un détail.. scuse

je reexplique
en A1 : 126000 ensuite je clic sur un bouton qui m'applique :

ActiveCell.Offset(0, 1).Value = ActiveCell.Value / 100 * 102 + 400

ce qui me donne en A2 128920 et je voudrais mettre aussi a la suite de cette formule =arrondi (ActiveCell -2) ce qui me donnerais 128900

Merci les Bêtes ...!!!! - Patrick

 

[jeanpierre]

Re : Arrondi de chiffre

Re Patrick,

Peux-tu expliciter plus en mettant un fichier exemple (ZIPPE), dans Gérer les pièces jointes en bas, Parcourir sur ton disque et Uploader.... fichier avec ton ou mieux tous tes exemples.

Car, tes soucis, excel les gères bien, sans créer une usine à gaz qui ne servirait qu'à alourdir... moins de macros, mieux on se porte.... (Et pour paraphraser notre ami Ti, la meilleure macro, c'est celle que l'on écrit pas)

Les macros ne doivent être utilisées que pour des choses un peu lourdes, répétitives et qu'excel ne sait pas ou peu gérer....

Il n'a pas de bêtes ici, sauf mon chien et mes chats, enfin, ici chez moi...

A te lire donc.

 

[Cousinhub]

Re : Arrondi de chiffre

Bonjour, essaie ce code :

ActiveCell.Offset(0, 1).Value = Evaluate("Round(" & ActiveCell.Value & "/ 100 * 102 + 400, -2)")

que tu peux insérer soit dans un module, soit dans un évènement de feuille

 

[Spitnolan08]

Re : Arrondi de chiffre

Bonsoir tout le monde,

Personnellement, je préfère :

 ActiveCell.Offset(0, 1).Value = WorksheetFunction.Round(ActiveCell.Value / 100 * 102 + 400, -2)

Pourquoi faire simple quand ...

Cordialement

 

[jeanpierre]

Re : Arrondi de chiffre

Bonsoir ou re à tous,

Ben, tiens manquait plus que Spit.............

voilà, c'est fait............

bof, mais c'est vendredi......

Amitiés tous.

Jean-Pierre

 

[Cousinhub]

Re : Arrondi de chiffre

bonsoir Spit

Personnellement, je préfère :
Code:

ActiveCell.Offset(0, 1).Value = WorksheetFunction.Round(ActiveCell.Value / 100 * 102 + 400, -2)

Pourquoi faire simple quand ...

Perso, je n'utilise pratiquement jamais WorksheetFunction, cela peut générer des erreurs, notamment avec Match et VLookUp entre autres.
Donc, je préfère dans ce cas faire compliqué....

 

[Spitnolan08]

Re : Arrondi de chiffre

Re,

@bhbh : Perso, je n'ai jamais eu les erreurs que tu présentes. Mais bon, je n'ai pas non plus testé toutes les combinaisons... Cependant les fonctions que tu cites nécessitent dans certains cas un classement préalable: c'est peut être la cause de tes erreurs.

Cordialement

 

[fred65200]

Re : Arrondi de chiffre

bonsoir le fil
Personellement, je n'écris jamais Application.WorksheetFunction.Round mais directement
Application.Round, j'ai toujours obtenu le résultat attendu.
Que ce soit pour round ou autre fonction.

Bonne soirée à tous

fred65200

 

[tvhabdo]

Re : Arrondi de chiffre

Salut... tout le monde ...

Merci pour la formule... j'ai fait copier coller dans ma macro et ça marche du TONNERRE...!!!
C'est exactement ce que je voulais ...!!!

Merci encore et bonne journée et.... à bientôt C'est sur

Ciao Patrick