Somme de 2 valeurs

Bonjour,

A travers une valeur dans une boîte de dialogue, je souhaiterai que cette valeur, une fois que j'aurai cliqué sur OK, s'additionne à une valeur déjà existante dans une case et que le résultat de cette case apparaisse dans cette même case.

Pour cela, j'ai écrit :
PrivateSub_OK1 Click

Sheets("Tableau").Select

If designation1="touret" Then Range("F138").Value = Range("F138").Value + quantite1.Value

End If
End Sub

Mais ça fonctionne pas :(
Si quelqu'un avait une solution ce serait le top!!!

1 réponse

  • Votes
  • Date
  • Date décroissante
  1. Bonjour,
    Désignation et quantite1 sont des noms de cellule ???
    1. Oui ce sont des zones texte que j'ai renommé
    2. J'ai réalisé une boîte de dialogue qui me demandera la désignation (à travers une zone modifiable) et la quantité (à travers une zone de texte ). Une fois que j'aurai cliquer sur ok ça s'appliquera sur un tableau déjà créé
    3. @David6465Re,
      Ok, ce que vous saisissez dans votre. Zone de texte c'est du texte pas du numérique.
      Il faut donc convertir le texte en numérique par val(quantite1)
    4. Donc à la programmation de la boîte de dialogue, je mets val(quantite1)="" au lieu de quantite1=""?