Ajouter une valeur à un total global
Résolu/Fermé
solene85
Messages postés
391
Date d'inscription
jeudi 24 janvier 2008
Statut
Membre
Dernière intervention
9 janvier 2016
-
23 sept. 2014 à 22:23
solene85 Messages postés 391 Date d'inscription jeudi 24 janvier 2008 Statut Membre Dernière intervention 9 janvier 2016 - 24 sept. 2014 à 00:11
solene85 Messages postés 391 Date d'inscription jeudi 24 janvier 2008 Statut Membre Dernière intervention 9 janvier 2016 - 24 sept. 2014 à 00:11
A voir également:
- Ajouter une valeur à un total global
- Ajouter un profil netflix payant - Guide
- Ajouter un compte gmail - Guide
- Ajouter un compte whatsapp - Guide
- Total av desabonnement ✓ - Forum Consommation & Internet
- Total adblock avis - Forum Windows
5 réponses
gbinforme
Messages postés
14946
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 684
23 sept. 2014 à 22:32
23 sept. 2014 à 22:32
Bonjour,
Au lieu de faire :
textbox22= texbox10
il suffit de faire :
textbox22=textbox22 + texbox10
Au lieu de faire :
textbox22= texbox10
il suffit de faire :
textbox22=textbox22 + texbox10
solene85
Messages postés
391
Date d'inscription
jeudi 24 janvier 2008
Statut
Membre
Dernière intervention
9 janvier 2016
13
23 sept. 2014 à 23:01
23 sept. 2014 à 23:01
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
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
eriiic
Messages postés
24570
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
23 avril 2024
7 213
23 sept. 2014 à 23:43
23 sept. 2014 à 23:43
Bonjour à tous,
Alors essaie :
TextBox15 = cdbl(TextBox15) + cdbl(TextBox19)
eric
Alors essaie :
TextBox15 = cdbl(TextBox15) + cdbl(TextBox19)
eric
solene85
Messages postés
391
Date d'inscription
jeudi 24 janvier 2008
Statut
Membre
Dernière intervention
9 janvier 2016
13
24 sept. 2014 à 00:00
24 sept. 2014 à 00:00
désolé Eriiic mais ça ne marche pas
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
solene85
Messages postés
391
Date d'inscription
jeudi 24 janvier 2008
Statut
Membre
Dernière intervention
9 janvier 2016
13
24 sept. 2014 à 00:11
24 sept. 2014 à 00:11
ca y est j'ai trouvé
voici la solution
TextBox15.Value = Val(TextBox15.Value) + Val(TextBox19.Value)
Merci GBinform et Eriic pour votre aide
voici la solution
TextBox15.Value = Val(TextBox15.Value) + Val(TextBox19.Value)
Merci GBinform et Eriic pour votre aide
