problème somme de deux variables

[zephis]

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

 

[tototiti2008]

Re : problème somme de deux variables

Bonjour zephis,

Peut-être, mais on est un peu à l'aveugle, là

v1 = CDbl(Txt_CodeInt.Value)
    v2 = CDbl(Txt_StockDispo.Value)

 

[zephis]

Re : problème somme de deux variables

Merci, c'était ça ^^