faire une somme de textboxs...

[guillaumelorchat]

Bonjour,

j'ai un USF avec 12 textbox. Dans les 11 premiers, on rentre une valeur. Dans le 12 se fait au fur et à mesure des entrées dans les box precedentes, le resultat.

Le probleme c'est que je voudrais utiliser les virgules et non les points... et c'est là que je bloque avec le probleme VAL et CDBL...
Pour l'instant j'ai

Private Sub smois1_change()
textbox13.value = val(textbox1.value) + val(textbox2.value) etc....
end sub

merci pour l'aide

 

[kjin]

Re : faire une somme de textboxs...

Bonsoir,
De ce que je comprends

Private Sub smois1_change()
TextBox13.Value = CDbl(TextBox1.Value) + CDbl(TextBox2.Value)...
end sub

A+
kjin

 

[guillaumelorchat]

Re : faire une somme de textboxs...

bonjour,

je ne comprends pas il me dit "erreur d'execussion 13, incompatibilité de type..." dès que je rentre un nombre dans le textbox1

 

[PascalXLD]

Re : faire une somme de textboxs...

Bonjour

essaies de combiner la modification virgule point en cours de frappe avec la somme en exit

tu as des exemples sur le forum à ce sujet

 

[guillaumelorchat]

Re : faire une somme de textboxs...

Bonjour,

je connais cette astuce pour remplacer la virgule par le point.
Le probleme que j'ai c'est que les nombres je suis obligé de les rentrer avec un point pour que les décimales soient prises en comptes alors que le resultat s'affiche avec une virgule.
Je voudrais que tout s'affiche avec une virgule et que la somme se fasse automatiquement au fur et à mesure que l'on rempli les textboxs.