Macro, somme sur une colonne variable
Fermé
Bonjour,
Après de nombreuses recherches, je ne parviens pas a adapter les différents code que j'ai pu trouver a ma problématique,
ajouter une somme variable en fonction du nombre de ligne ?
faire la somme de cellule B2 a la dernière ligne de la colonne B ou le résultat se trouve a la fin de la plage de données,
http://www.cjoint.com/c/FJkqTsvuV6g
Pouvez vous m'indiquer quel code utiliser ?
Merci
Après de nombreuses recherches, je ne parviens pas a adapter les différents code que j'ai pu trouver a ma problématique,
ajouter une somme variable en fonction du nombre de ligne ?
faire la somme de cellule B2 a la dernière ligne de la colonne B ou le résultat se trouve a la fin de la plage de données,
http://www.cjoint.com/c/FJkqTsvuV6g
Pouvez vous m'indiquer quel code utiliser ?
Merci
A voir également:
- Vba somme plage variable
- Formule somme excel colonne - Guide
- Somme si couleur - Guide
- Image de manchots sur une image de plage. - Forum Graphisme
- Somme en anglais excel - Guide
- Image de manchots sur une image de plage ✓ - Forum Graphisme
4 réponses
ccm81
Messages postés
10908
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
2 mai 2025
2 431
Modifié par ccm81 le 10/10/2016 à 19:05
Modifié par ccm81 le 10/10/2016 à 19:05
Bonjour
Tu es sûr d'avaoir besoin d'une macro ?
formule en B16
=SOMME(DECALER($A$2;0;1;NBVAL(A:A)-2;1))
si tu insères une ligne avant la ligne total, elle sera prise en compte (dans la mesure où la colonne A est remplie)
Cdlmnt
Tu es sûr d'avaoir besoin d'une macro ?
formule en B16
=SOMME(DECALER($A$2;0;1;NBVAL(A:A)-2;1))
si tu insères une ligne avant la ligne total, elle sera prise en compte (dans la mesure où la colonne A est remplie)
Cdlmnt
ccm81
Messages postés
10908
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
2 mai 2025
2 431
10 oct. 2016 à 19:28
10 oct. 2016 à 19:28
Va pour une macro
Cdlmnt
Dim lifin As Long, plage As Range
With Sheets("Feuil1")
lifin = Range("A" & Rows.Count).End(xlUp).Row
Set plage = Range("B2:B" & lifin)
Range("A" & lifin + 1).Value = "total"
Range("B" & lifin + 1).Value = Application.WorksheetFunction.Sum(plage)
End With
Cdlmnt