Ah, c'est de l'Excel !
Pour faire un test, est ce que la même erreur apparait avec seulement
Range("D1" ).Value = CDec(Range("D1" ).Value) |
Je soupçonne que le problème vient du "- TextBox3 ".
Comme son nom l'indique, une textbox contient normalement du texte, et non pas un nombre.
Mais VB est souple, et utilise souvent des données de type Variant.
Je crois que c'est ce qui se passe sur la ligne
Cette ligne aurait dû donner une erreur, si VB n'était pas souple, car on ne devrait pas mettre un nombre là où il faudrait avoir une chaine de caractères.
Il aurait mieux value faire
Ensuite, dans la formule qui ne marche pas, c'est peut-être parce, dans ce cas-là VB, serait moins souple.
Essayer :
Range("D1" ).Value = CDec(Range("D1" ).Value) - CDbl(TextBox3.Value) |