ARRONDIR a l'unite superieur

Bonsoir EXCEL PRATIQUE

Bonsoir tout le monde

SVP si vous pouvez m'aider a trouver une solution a ce probleme

Comment ecrire pour arrondire a la dizaine superieur :

Par exemple un chiffre dans TextBox3 qui est ( 53744.30 ) je veux l'afficher ( 55745.00 )

Par exemple aussi ( 53149.58 ) je veux l'afficher ( 53150.00 )

Merci beaucoup d'avance pour l'aide

Cordialement

MARTI MARTI

=arrondi(x*10;0)/10

Bonjour,

Mets-toi d'accord ! arrondir 44,3 à 45 ce n'est pas la dizaine, c'est l'unité.

A la dizaine, on arrondirait 44,3 à 50 !

Les fonctions ne manquent pas dans Excel : ARRONDI.SUP et PLAFOND en particulier, et tu peux y parvenir encore par d'autres moyens...

Bonsoir Peuwi

Merci beaucoup pour votre aide

Tres gentil de votre part

Bonsoir MFerrand

Oui vous avez bien raison

Je veux en realité arrondir à l'unité superier .. j'ai fais une grande erreur

Merci d'avance pour l'aide

Cordialement

MARTI

En VBA tu peux faire (v étant ta valeur)

v = Iif(v > Int(v), Int(v) + 1, Int(v))

En formule : =(A1>ENT(A1))+ENT(A1)

Bonsoir MFerrand

Merci beaucoup pour vos codes

J'ai pas pu les mettre correctement

SVP où je vais mettre votre premier code vba dans ces codes :

Private Sub TextBox1_Change()

Me.TextBox3.Text = Val(Replace(Me.TextBox1, ",", ".")) + Val(Replace(Me.TextBox2, ",", "."))

End Sub

Private Sub TextBox2_Change()

Me.TextBox3.Text = Val(Replace(Me.TextBox1, ",", ".")) + Val(Replace(Me.TextBox2, ",", "."))

End Sub

Merci beaucoup d'avance

Amicalement

MARTI

Tu ne vas pas te noyer dans un verre d'eau tout de même !

Depuis le temps que tu vba-ises à tout va...

Tu dois quand même savoir où trouver les nombres que tu veux arrondir.

Tu peux faire :

Private Sub TextBox1_Change()
   Dim v
   v= Val(Replace(Me.TextBox1, ",", ".")) + Val(Replace(Me.TextBox2, ",", "."))
   Me.TextBox3.Text = Iif(v > Int(v), Int(v) + 1, Int(v))
End Sub

BRAVO MFerrand

C'est exactement ce que je veux avoir

C'est parfaitement resolu

Amicalement

MARTI