Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202174 27 juil. 2004 à 14:56
voici une fonction qui pourrais être utile :
Function Round(ByVal Dec, Optional ByVal Unit As Integer 1, Optional Truncate As Boolean False)
Round = Val(Dec) - Dec Mod Unit
If Not Truncate Then Round = Round + Unit
End Function
elle permet d'arrondir par excès ou par defaut, avec un seuil parametrable :