Ajouter une valeur à un total global

Résolu
solene85 Messages postés 414 Statut Membre -  
solene85 Messages postés 414 Statut Membre -
Bonsoir,
En sélectionnant une donnée dans ma combobox j'obtiens un résultat stocké dans une texbox10. Ce résultat s'affiche dans une autre textbox appelons la textbox22.
quand je sélectionne une autre donnée de cette combobox un résultat s'affiche à nouveau dans la texbox10 mais je voudrais qu'il s'ajoute aussi automatiquement au total figurant dans la textbox22
pouvez vous m'aider s'il vous plait

merci

5 réponses

  1. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
     
    Bonjour,

    Au lieu de faire :
    textbox22= texbox10
    il suffit de faire :
    textbox22=textbox22 + texbox10
    0
  2. solene85 Messages postés 414 Statut Membre 14
     
    merci gbinforme pour ta réponse
    c'est ce que j'avais fait mais les résultats se collent l'un à l'autre dans la textbox22 au lieu de s'ajouter en l'occurence il s'agit de la textbox15 au lieu de 22
    voici mon code

    Private Sub CommandButton1_Click()
    n = UserForm1.TextBox10.Value
    TextBox19 = n * TextBox11
    TextBox15 = TextBox15 + TextBox19

    num = Sheets("bonsortie").Range("A65536").End(xlUp).Row + 1 'on part du bas de la colonne, on cherche
    Sheets("bonsortie").Activate

    Range("A" & num).Value = ComboBox2.Value
    Range("B" & num).Value = TextBox9.Value
    Range("C" & num).Value = TextBox10.Value
    Range("D" & num).Value = TextBox15.Value

    End Sub
    0
  3. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour à tous,

    Alors essaie :
    TextBox15 = cdbl(TextBox15) + cdbl(TextBox19)

    eric

    0
  4. solene85 Messages postés 414 Statut Membre 14
     
    désolé Eriiic mais ça ne marche pas
    0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. solene85 Messages postés 414 Statut Membre 14
     
    ca y est j'ai trouvé
    voici la solution

    TextBox15.Value = Val(TextBox15.Value) + Val(TextBox19.Value)

    Merci GBinform et Eriic pour votre aide
    0