Discussion :

[acostast]

Bonjour,

Je recherche le moyen de sommer dans une textbox la valeur de 2 autres textbox qui sont donnés dans une userform.

Merci

[greg06500]

Salut,

Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Dim tb1 as Double 
tb1 = Textbox1.value
TextBox3.value = Textbox2.Value + tb1

@+

GREG

[Invité]

Bonjour Acostat,

Greg06500 : le résultat ne devrait pas être la somme des valeurs mais la concaténation des valeurs (un TextBox ne contient que du texte) donc :

Avec Textbox1 = 13.50 et Textbox2 = 14.50 on obtient 13.5014.50

Pour additionner les valeurs :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

TextBox3.Value = Val(TextBox2.Value) + Val(TextBox1.Value)

Si cette somme doit ensuite être affectée à une cellule dans une feuille Excel il faudra mettre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
= CDbl(TextBox1.Value) pour les nombres décimaux
si le contenu est un nombre entier, peut aussi mettre : 
= Val(TextBox1.Value)

[fred65200]

bonsoir le fil

on peux aussi faire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
TextBox3 = TextBox1 * 1 + TextBox2 * 1

et pour insérer dans une feuille de calcul

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
[B18] = TextBox3 * 1 ' *1 pour l'avoir au format nombre

cordialement