Calcul automatique dans un userform

Bonjour à tous,

je souhaiterais faire un calcul automatique dans mon userform. C'est à dire entrer des chiffres dans une texte box1 puis l’additionner avec une textbox2 et le résulte affiche dans une textbox3.

Exemple: textbox1 = textbox2 + textbox3.

Très respectueusement.

Bonjour et bienvenu(e)

A tester

Private Sub TextBox2_Change()
 Calcul
End Sub

Private Sub TextBox3_Change()
 Calcul
End Sub

Sub Calcul()
  Me.TextBox1 = Val(Replace(Me.TextBox2, ",", ".")) + Val(Replace(Me.TextBox3, ",", "."))
End Sub

Salut Banzai64,

quand je teste ton code, il y a une erreur qui affiche. L'erreur dit:

Erreur de compilation

Sub, Fonction ou Property attendue.

Merci

Bonjour Banzai jeunixe...

jeunixe a écrit :

Salut Banzai64,

quand je teste ton code, il y a une erreur qui affiche. L'erreur dit:

Erreur de compilation

Sub, Fonction ou Property attendue.

Merci

Ca c'est le classe...Une personne qui explique le code erreur qu'il voit à l'écran...Jeunixe, tu es une perle rare !

Bonjour

Fournis le fichier en cause

Salut Banzai64,

voici le fichier joint.

Très respectueusement

Bonjour

A voir

Salut Banzai64

tu es extraordinaire. Ton code marche à merveille. Énormément merci pour avoir pris soin de mon problème. Merci à toi et à tous ceux qui on pris la peine de nous lire.

très respectueusement.