Z
zephis
Guest
Bonjour !
J'ai un problème pour faire la somme de deux variables :
Private Sub Valider_Click()
Dim Newstock, v1, v2 As Variant
v1 = Txt_CodeInt.Value
v2 = Txt_StockDispo.Value
Newstock = v1 + v2
For Each c In Range([C2], [C65000].End(xlUp))
If c = Me.cbo_chgarticle Then
c.Offset(0, 7) = Newstock
End If
Next c
End sub
En fait, ça ne m'additionne pas mes variables, mais ça mes les mets une à la suite de l'autre.
Exemple, si v1 = 10 et v2 = 6 ça me met 106.
J'arrive pas à transformer mes variables text en numérique en fait je pense
J'ai un problème pour faire la somme de deux variables :
Private Sub Valider_Click()
Dim Newstock, v1, v2 As Variant
v1 = Txt_CodeInt.Value
v2 = Txt_StockDispo.Value
Newstock = v1 + v2
For Each c In Range([C2], [C65000].End(xlUp))
If c = Me.cbo_chgarticle Then
c.Offset(0, 7) = Newstock
End If
Next c
End sub
En fait, ça ne m'additionne pas mes variables, mais ça mes les mets une à la suite de l'autre.
Exemple, si v1 = 10 et v2 = 6 ça me met 106.
J'arrive pas à transformer mes variables text en numérique en fait je pense