Arrondi (2 formules)

Soyez le premier à donner votre avis sur cette source.

Vue 8 915 fois - Téléchargée 698 fois

Description

Je rebondi sur une source de Nix qui présentait une formule d'arrondi avec la fonction Format qui arrondi dès 5, j'ajoute une fonction qui arrondi au dessus de 5

Source / Exemple :


Tout est dans le zip

Conclusion :


Le code peut-il être simplifié ? Je suis preneur car je n'utilise que cette formule dans tous mes programmes

Codes Sources

A voir également

Ajouter un commentaire Commentaires
cs_snoop44 Messages postés 9 Date d'inscription dimanche 20 février 2005 Statut Membre Dernière intervention 23 septembre 2011
4 nov. 2005 à 00:44
En tout cas FURYBOND, ta technique d'arrondi est parfaite, si on a besoin d'arrondir a l'inferieur à 5

Moi qui la cherche depuis une heure mdr :)
cs_furybond Messages postés 10 Date d'inscription vendredi 13 juin 2003 Statut Membre Dernière intervention 29 décembre 2003
29 déc. 2003 à 14:23
Essayes le code suivant :

****

Dim Arrondie as Currency
Arrondie = Round(Valeur, NbDecimal)

****

Valeur = valeur à arrondir (tu peux passer un currency)
NbDecimal = nombre de décimales que l'on souhaite conserver
Arrondie = valeur arrondie

Cette fonction VB correspont-elle à ce que tu veux faire ?

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.