Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Addition la valeur de 2 textbox en vba

3 réponses
Avatar
michel-68000
bonjour,
Je cherche a faire apparaitre la somme de 5 textbox dans un textbox de mon
userform, J'ai essayé textboxTotal.value=sum(textbox1.value+textbox2.value+
ect) mais ça ne fonctionne pas.
Merci pour vos suggestions

3 réponses

Avatar
JB
Bonjour,

x = CDbl(Me.TextBox1) + CDbl(Me.TextBox2)
MsgBox x

JB


On 16 août, 14:19, "michel-68000" wrote:
bonjour,
Je cherche a faire apparaitre la somme de 5 textbox dans un textbox de mon
userform, J'ai essayé textboxTotal.value=sum(textbox1.value+textbox2. value+
ect) mais ça ne fonctionne pas.
Merci pour vos suggestions


Avatar
michel-68000
ça marche impec mais il ne faut pas que l'un des textbox soit vide.Tu
n'aurais pas une parade?
Enfin merci pour ton coup de main.
Avatar
JB
Private Sub CommandButton1_Click()
x = ConvNum(Me.TextBox1.Value) + ConvNum(Me.TextBox2.Value)
MsgBox x
End Sub

Function ConvNum(n)
If IsNumeric(x) Then
If n <> "" Then
ConvNum = CDbl(n)
Else
ConvNum = 0
End If
Else
ConvNum = 0
End If
End Function

JB

On 16 août, 15:48, "michel-68000" wrote:
ça marche impec mais il ne faut pas que l'un des textbox soit vide.Tu
n'aurais pas une parade?
Enfin merci pour ton coup de main.