Arrondir une valeur

bonjour à tous
j'ai cette petite fonction et j'ignore comment arrondir mon résultat au supérieur.
Du genre solde=1358,784 il doit m'afficher 1358,78

Code:

---

1 2 3 4 5 6 7

Private Sub Calcul_frais_Click() Dim tot As Double FraisMission = Hebergement + Transport + Restauration + Telephone + Divers + Txtautre Txtajustif = Transport + Telephone + Divers + Txtautre + Hebergement tot = Val((Hebergement + Transport + Restauration + Telephone + Divers + Txtautre) / 655.957) euro = tot solde = Val((Txtajustif) / 655.957)

---

merci de votre support!

Salut,

Je te propose d'aller voir ici :

http://www.developpez.net/forums/d41...i-sous-access/

Ca peut t'aider je pense.

Cdlt.

salut et merci pour ta réponse
j'avais déjà jeter un coup d'oeil là dessus,mais le résultat n'était pas satisfaisant

Code:

---

1 2 3

tot = Round((Hebergement + Transport + Restauration + Telephone + Divers + Txtautre) / 655.957) euro = tot solde = Round((Txtajustif) / 655.957)

---

avec la propriété Standard,
il arrondit juste pour solde=1358,784 ->1359,00

Tu es sur la bonne voie, une recherche plus accentuée aurait pu te permettre de trouver cela :

Code:

---

1 2 3

Round (210.677, 1) would return 210.7 Round (210.677, 2) would return 210,68 Round (210.677) would return 211

---

Cordialement.

Bonjour,
la fonction Round accepte deux arguments; la valeur à arrondir et la précision.

Ex: Pour une précision au centième (2 décimales après la virgule)

Code:

---

solde=Round(Txtajustif/655.957,2)

---

j'ai modifié mon code comme suit:

Code:

---

solde = Round(Txtajustif / 655.957, 2)]

---

avec la propriété Standard décimal 0, me donne un résultat par 1372,00 au lieu de 1372,05

Attends, décimal 0 veut dire que tu ne souhiates pas de décimal après la virgule. Tu auras toujours ",00"

oui,mais même avec décimal à 2,j'obtiens un résultat du genre ",00"

Code:

---

1 2 3 4 5 6

Txtajustif = Transport + Telephone + Divers + Txtautre + Hebergement tot1 = (Hebergement + Transport + Restauration + Telephone + Divers + Txtautre) / 655.957 tot = Round(tot1, 2)   solde = Round(Txtajustif / 655, 2)

---

salut,

je propose l'utilsation de la fonction Cint() dans ton cas.
Est-ce cohérent avec ta volonté de n'avoir qu'un entier en sortie ?

salut et merci pour ton post
mais le résultat n'a pas changé

Code:

---

1 2 3

tot = CInt((Hebergement + Transport + Restauration + Telephone + Divers + Txtautre) / 655.957)   solde = CInt(Txtajustif / 655)

---

D'accord

Code:

---

solde=Round(CSng(txtajustif/655.957),2)

---

toujours le même résultat :oops:
j'avoue que je comprends pas!

Excepté ceci :

Code:

---

solde=CSng(Round(CSng(txtajustif/655.957),2))

---

je ne vois pas.

Bonjour,

Heu... une question bête mais sait-on jamais...Comment est déclarée ta variable solde?

malheureusement non,
j'ai le format Standard décimal à 2,je ne comprend pas pourquoi il arrondit au supérieur

Oh les amis,c'est pas croyable! :(
il suffisait de changer le format de la variable dans la table, elle était déclaré avec un standard 0
Merci à tous :hola:
Merci à EddiGordo de nous avoir éclairer:king: et désolé à ilank :king:d'avoir fait couler beaucoup d'encre pour presque rien
en tout cas,BRAVO les gars:yaisse2:

Bonsoir,
Une petite question à mon tour,
le controle Solde est-il liè à une colonne de table et si oui de quel type de donnée ?

:)

PS : Je n'étais pas allé au bout des lectures , salut !

de type monétaire!