--
@+
Raymond
http://perso.wanadoo.fr/seneque/access/
"Bruno" <guy.ja...@wanadoo.fr> a écrit dans le message de news:
01ae01c2c2b7$fd59a6f0$cef82ecf@TK2MSFTNGXA08...
Bonjour,
Function arrondiprox(valeur, pas)
arrondiprox = Int(valeur / pas + 0.5) * pas
End Function
Function arrondiinf(valeur, pas)
arrondiinf = Int(valeur / pas) * pas
End Function
Function arrondisup(valeur, pas)
arrondisup = -Int(-valeur / pas) * pas
End Function
Voila
Gilbert