Sub CalculSomme()
Me.Label21.Caption = Val(Replace(Me.TextBox15, ",", ".")) - Val(Replace(Me.TextBox11, ",", "."))
End Sub[/Quote
teste si cela regle ton probleme car ton dernier fichier fait référence a des Classeur que nous n'avons pas .
jean marie
Bonsoir ChTi160,le forum
Merci, cela fonctionne.
J'ai intégré le code au bouton "valider"
Peux-tu me dire pourquoi j'ai toujours une virgule et non un point?
ça veut dire remplacer la Virgule par une Virgule ??????
il faut :
soit : remplacer la Virgule par un Point
je te laisse corriger dans ton fichier
et tu nous dis.
jean marie
Désolé, j'ai juste fait un test dans le fichier joint..
Mais même avec ",","." j'ai toujours une virgule dans le résultat.
Je demande un point dans la textbox 15 pour la mise en forme conditionnelle....peut être que cela vient de là?