Bjr,
Comment faire pour arrondir un nombre entier ou double
(dans requete ou rapport)
- a la cinquantaine superieure (28236 > arrondir a 28250)
- a la centaine superieure (28236 > arrondi a 28300)
- a la 500taine superieure (28236 > arrondi a 28500)
- au 1000 superieur (28236 > arrondi a 29000)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Gafish
Bonjour,
Pour arrondir à la centaine (ou au millier) supérieur c'est facile, tu prends la partie entière de la division par 100 (ou par 1000), tu ajoutes 1, et tu remultiplies par 100 (ou par 1000). Par la cinquantaine (ou 500taine), tu fais de la même manière mais tu testes si la partie décimale est supérieur à 50 (ou 500) et ca conditionnera l'ajout du +1 avec la remultiplication ou de l'ajout de 50 (ou de 500) après la remultiplication.
Arnaud
"tomyboy" a écrit dans le message news:
Bjr, Comment faire pour arrondir un nombre entier ou double (dans requete ou rapport) - a la cinquantaine superieure (28236 > arrondir a 28250) - a la centaine superieure (28236 > arrondi a 28300) - a la 500taine superieure (28236 > arrondi a 28500) - au 1000 superieur (28236 > arrondi a 29000)
avec Access2002 / SP2 Mci a tous
Bonjour,
Pour arrondir à la centaine (ou au millier) supérieur c'est facile, tu
prends la partie entière de la division par 100 (ou par 1000), tu ajoutes 1,
et tu remultiplies par 100 (ou par 1000).
Par la cinquantaine (ou 500taine), tu fais de la même manière mais tu testes
si la partie décimale est supérieur à 50 (ou 500) et ca conditionnera
l'ajout du +1 avec la remultiplication ou de l'ajout de 50 (ou de 500) après
la remultiplication.
Arnaud
"tomyboy" <mrossier@mscgva.ch> a écrit dans le message news:
73fd944a.0412010621.6a78e414@posting.google.com...
Bjr,
Comment faire pour arrondir un nombre entier ou double
(dans requete ou rapport)
- a la cinquantaine superieure (28236 > arrondir a 28250)
- a la centaine superieure (28236 > arrondi a 28300)
- a la 500taine superieure (28236 > arrondi a 28500)
- au 1000 superieur (28236 > arrondi a 29000)
Pour arrondir à la centaine (ou au millier) supérieur c'est facile, tu prends la partie entière de la division par 100 (ou par 1000), tu ajoutes 1, et tu remultiplies par 100 (ou par 1000). Par la cinquantaine (ou 500taine), tu fais de la même manière mais tu testes si la partie décimale est supérieur à 50 (ou 500) et ca conditionnera l'ajout du +1 avec la remultiplication ou de l'ajout de 50 (ou de 500) après la remultiplication.
Arnaud
"tomyboy" a écrit dans le message news:
Bjr, Comment faire pour arrondir un nombre entier ou double (dans requete ou rapport) - a la cinquantaine superieure (28236 > arrondir a 28250) - a la centaine superieure (28236 > arrondi a 28300) - a la 500taine superieure (28236 > arrondi a 28500) - au 1000 superieur (28236 > arrondi a 29000)
avec Access2002 / SP2 Mci a tous
Gilles
"tomyboy" a écrit:
Bjr, Comment faire pour arrondir un nombre entier ou double (dans requete ou rapport) - a la cinquantaine superieure (28236 > arrondir a 28250) - a la centaine superieure (28236 > arrondi a 28300) - a la 500taine superieure (28236 > arrondi a 28500) - au 1000 superieur (28236 > arrondi a 29000) avec Access2002 / SP2 Mci a tous
Bonjour, TomyBoy
Public Function ArrondirXaineSup(Nombre as Variant _ , Xaine as Long) as Long Dim Multiple as Long Multiple = 0 If IsNumeric(Nombre) Then Multiple = Nombre Xaine ' Division entière ' Pour les nombres positifs, on regarde le reste ' de la division entière If Nombre > 0 And (Nombre Mod Xaine) <> 0 Then Multiple = Multiple + 1 End If End If ArrondirXaineSup = Multiple * Xaine End Function
Bonne continuation
"tomyboy" a écrit:
Bjr,
Comment faire pour arrondir un nombre entier ou double
(dans requete ou rapport)
- a la cinquantaine superieure (28236 > arrondir a 28250)
- a la centaine superieure (28236 > arrondi a 28300)
- a la 500taine superieure (28236 > arrondi a 28500)
- au 1000 superieur (28236 > arrondi a 29000)
avec Access2002 / SP2
Mci a tous
Bonjour, TomyBoy
Public Function ArrondirXaineSup(Nombre as Variant _
, Xaine as Long) as Long
Dim Multiple as Long
Multiple = 0
If IsNumeric(Nombre) Then
Multiple = Nombre Xaine ' Division entière
' Pour les nombres positifs, on regarde le reste
' de la division entière
If Nombre > 0 And (Nombre Mod Xaine) <> 0 Then
Multiple = Multiple + 1
End If
End If
ArrondirXaineSup = Multiple * Xaine
End Function
Bjr, Comment faire pour arrondir un nombre entier ou double (dans requete ou rapport) - a la cinquantaine superieure (28236 > arrondir a 28250) - a la centaine superieure (28236 > arrondi a 28300) - a la 500taine superieure (28236 > arrondi a 28500) - au 1000 superieur (28236 > arrondi a 29000) avec Access2002 / SP2 Mci a tous
Bonjour, TomyBoy
Public Function ArrondirXaineSup(Nombre as Variant _ , Xaine as Long) as Long Dim Multiple as Long Multiple = 0 If IsNumeric(Nombre) Then Multiple = Nombre Xaine ' Division entière ' Pour les nombres positifs, on regarde le reste ' de la division entière If Nombre > 0 And (Nombre Mod Xaine) <> 0 Then Multiple = Multiple + 1 End If End If ArrondirXaineSup = Multiple * Xaine End Function
Bonne continuation
Gilbert
Bonjour,
Essaye avec les fonctions suivantes 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
Gilbert
"tomyboy" a écrit dans le message de news:
Bjr, Comment faire pour arrondir un nombre entier ou double (dans requete ou rapport) - a la cinquantaine superieure (28236 > arrondir a 28250) - a la centaine superieure (28236 > arrondi a 28300) - a la 500taine superieure (28236 > arrondi a 28500) - au 1000 superieur (28236 > arrondi a 29000)
avec Access2002 / SP2 Mci a tous
Bonjour,
Essaye avec les fonctions suivantes
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
Gilbert
"tomyboy" <mrossier@mscgva.ch> a écrit dans le message de
news:73fd944a.0412010621.6a78e414@posting.google.com...
Bjr,
Comment faire pour arrondir un nombre entier ou double
(dans requete ou rapport)
- a la cinquantaine superieure (28236 > arrondir a 28250)
- a la centaine superieure (28236 > arrondi a 28300)
- a la 500taine superieure (28236 > arrondi a 28500)
- au 1000 superieur (28236 > arrondi a 29000)
Essaye avec les fonctions suivantes 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
Gilbert
"tomyboy" a écrit dans le message de news:
Bjr, Comment faire pour arrondir un nombre entier ou double (dans requete ou rapport) - a la cinquantaine superieure (28236 > arrondir a 28250) - a la centaine superieure (28236 > arrondi a 28300) - a la 500taine superieure (28236 > arrondi a 28500) - au 1000 superieur (28236 > arrondi a 29000)