OVH Cloud OVH Cloud

Arrondir entier inférieur

2 réponses
Avatar
juju
Salut =E0 tous,
la fonction ENT de microsoft, qui donne la valeur enti=E8re=20
inf=E9rieure d'un nombre ne fonctionne pas sous access. La=20
fonction arrondi dont je dispose ne permet pas d'y arriver=20
non plus (ou alors le pb est entre le fauteuil et le=20
clavier???)
Quelqu'un pourrait-il m'aiguiller sur cette satan=E9e=20
fonction entier si elle existe.

Merci d'avance.

2 réponses

Avatar
phil
Normalement, en VBA, tu peux arrondir ainsi :
VarArrondi = CInt(VarAvecVirg)

Mais il se peut que l'arrondi se fasse a l'entier
superieur, alors :
If VarArrondi>VarAvecVirg then
VarArrondi=VarArrondi - 1
End If

En une seule ligne :

VarArrondi = IIf(Cint(VarAvecVirg)>VarAvecVirg,Cint
(VarAvecVirg)-1,Cint(VarAvecVirg))

Phil

-----Message d'origine-----
Salut à tous,
la fonction ENT de microsoft, qui donne la valeur entière
inférieure d'un nombre ne fonctionne pas sous access. La
fonction arrondi dont je dispose ne permet pas d'y
arriver

non plus (ou alors le pb est entre le fauteuil et le
clavier???)
Quelqu'un pourrait-il m'aiguiller sur cette satanée
fonction entier si elle existe.

Merci d'avance.
.



Avatar
Michel Walsh
Salut,


Int( x ) retourne le plus grand entier inférieur ou égal à x,

-Int(-x) retourne le plus petit entier supérieur ou égal à x.



Celà présupose qu'on accepte que -5 est inférieur à -4.1, par exemple,
et donc, que -4 est plus grand que -4.9, pareillement.



Espérant être utile,
Vanderghast, Access MVP


"juju" wrote in message
news:697901c3e66d$584163d0$
Salut à tous,
la fonction ENT de microsoft, qui donne la valeur entière
inférieure d'un nombre ne fonctionne pas sous access. La
fonction arrondi dont je dispose ne permet pas d'y arriver
non plus (ou alors le pb est entre le fauteuil et le
clavier???)
Quelqu'un pourrait-il m'aiguiller sur cette satanée
fonction entier si elle existe.

Merci d'avance.