Deux chiffres après la virgule

Bonjour, je suis nouveau sur le forum et débutant en langage VBA.

J'ai un souci avec des textbox dans un userform :

J'ai deux textbox qui utilise un calcul entre elle : si j'en remplie une alors elle se multiplie avec une autre, si je remplie l'autre alors elle fait une division.

Mais le souci je n'arrive pas a mettre un code pour que les textbox n'affiche que 2 chiffres apres la virgule lorsqu'elles font l'opération?

Je precise que je suis sous excel 2010 et sur mac

Voila les codes des textbox

Private Sub TextBox9_AfterUpdate()

UserForm1.TextBox9 = UserForm1.TextBox9.Value

If UserForm1.TextBox9 <> "" Then

UserForm1.TextBox15 = UserForm1.TextBox9 * UserForm1.TextBox21

End If

End Sub

Private Sub TextBox15_AfterUpdate()

UserForm1.TextBox15 = UserForm1.TextBox15.Value

If UserForm1.TextBox15 <> "" Then

UserForm1.TextBox9 = UserForm1.TextBox15 / UserForm1.TextBox21

End If

End Sub

Merci en attendant votre aide.

Bonjour,

Comme on ne connait pas tes données, on prend quelques précautions !

D'autre part dans un module de Userform, le Userform, c'est Me. Et on peut l'omettre si un seul Userform chargé...

Private Sub TextBox9_AfterUpdate()
    Dim v
    If TextBox9 <> "" Then
        v = Val(Replace(TextBox9.Value, ",", "."))
        v = Val(Replace(TextBox21.Value, ",", ".")) * v
        TextBox15.Value = Format(v, "0.00")
    End If
End Sub

Private Sub TextBox15_AfterUpdate()
    Dim v
    If TextBox15 <> "" Then
        v = Val(Replace(TextBox15.Value, ",", "."))
        v = v / Val(Replace(TextBox21.Value, ",", "."))
        TextBox9 = Format(v, "0.00")
    End If
End Sub

Note l'utilisation des balises Code. Il serait bon que tu prennes exemple. Et l'indentation également !

Cordialement.

Merci pour la réponse, je vais tester tout ça.

Je vais essayer d'être plus clair dans les codes.

Super MF FERRAND tout fonctionne.

Merci