Arrondir

Retour vers Access

Arrondir

Situation : Le problème est simple comment arrondir dans TOUS les cas.
L'on sait que de manière standard les logiciels arrondissent les valeurs suivant la logique "supérieur ou inférieur à 0,5 unité"; c'est celle que nous utilisions avec les centimes (époque anté-€uros)
On peut le constater ici (colonne ArrondiStandard). Pour obtenir ce résultat nous utilisons la formule

ArrondiStandard: Format((([QuantiteTptee])/[QEmb]);"Standard")

Si l'on souhaite obtenir un arrondi inférieur , on utilisera

ArrondiInf: Arrond(([QuantiteTptee])/[QEmb])

Et finalement, la petite formule magique que j'ai trouvée chez Jessy SEMPERE

ArrondiSup & Multiple: -Ent(-(([QuantiteTptee])/[QEmb])/1)*1

Ces formules sont placées sur des champs calculés dans des requêtes
Lui, en fait a développé une fonction qui permet de retrouver les multiples. Si dans la formule vous changez le 1 en 5 et que vous traitiez le nombre 47 vous aurez comme résultat 50 - variable dblMultiple

Public Function ArrondirMultipleSup(strField As String, _
dblMultiple As Double) As Double
  'Permet d'arrondir à un multiple supérieur
  ArrondirMultipleSup = -Int(-strField / dblMultiple) * dblMultiple
End Function

Fin