Sujet Précédent Sujet Suivant

Somme conditionnelle

Fermé
jfqld Messages postés 9070 Date d'inscription jeudi 18 septembre 2008 Statut Membre Dernière intervention 28 mai 2018 - Modifié par JSmithJ le 27/09/2016 à 14:27
Mike-31 Messages postés 18313 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 21 avril 2024 - 28 sept. 2016 à 07:59
bonjour
j ai un tableau avec près de 600 colonnes sur 15 / 20 lignes. la 21eme ligne est le totla de ma colonne. et en fin de tableau j ai le total de toutes mes colonnes.
ESt il possible de mettre des totaux en couleur et n additonner que ceux qui sont en couleur en fin de tableau
plutot que de faire AN21 + AN 25 + AN 35 etc.
exemple : si le total de ma colonne est rouge on l additionne en fin de tableau sinon non

merci
Je boirais du lait quand les vaches mangeront du raisin

3 réponses

Réponse 1 / 3
JSmithJ Messages postés 4360 Date d'inscription mercredi 7 mai 2014 Statut Contributeur Dernière intervention 13 juillet 2021 719
27 sept. 2016 à 14:26
Bonjour,

si vous choisissez une couleur pour certains totaux, c'est qu'il doit y avoir une condition. Ne serait-ce pas plus simple d'utiliser la formule SOMME.SI()?
0
Réponse 2 / 3
Fahora Messages postés 814 Date d'inscription jeudi 24 septembre 2015 Statut Membre Dernière intervention 2 janvier 2023 68
Modifié par Fahora le 27/09/2016 à 14:38
Bonjour ,

C'est un sujet qui revient assez fréquemment, à voir si ça te convient.

Il faut utiliser les macros
Alt + F11
A insérer dans un module : 

Function SommeCouleur(Zone As Range, CRef As Range)
    Dim c, Cel, S
    c = CRef.Interior.ColorIndex
    S = 0
    For Each Cel In Zone
        If Cel.Interior.ColorIndex = c Then
            S = S + Cel.Offset(0, 0)
        End If
    Next
    SommeCouleur = S
End Function


Puis utiliser la fonction SommeCouleur

exemple :

=sommecouleur(Plageàtester;celluleDeRéférencepourlaCouleur)
Plage à tester pour toi :
AN1:AN35
Cellule de référence pour la couleur selon la couleur que tu veux.

Cordialement,

Nos seules limites sont celles que nous nous imposons nous-même.
La politesse et un merci ne tuent pas. Il existe un bouton pour "Résolu" pour confirmer que     votre problème n'en est plus un. Fahora
0
jfqld Messages postés 9070 Date d'inscription jeudi 18 septembre 2008 Statut Membre Dernière intervention 28 mai 2018 123
27 sept. 2016 à 15:49
impec
merci
0
jfqld Messages postés 9070 Date d'inscription jeudi 18 septembre 2008 Statut Membre Dernière intervention 28 mai 2018 123
28 sept. 2016 à 07:09
j ai dit impec mais je n y arrive pas
j ai mis ma formule en faisant ALT + F11
mais somme couleur n apparait pas dans mes fonctions
et je ne comprends pas Cellule de référence pour la couleur selon la couleur que tu veux.
0
Réponse 3 / 3
Mike-31 Messages postés 18313 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 21 avril 2024 5 073
28 sept. 2016 à 07:59
Bonjour,

ouvre le Visual Basic (Alt et la touche F11)
Insertion/Module et colle le code dans le module
ensuite sur ta feuille de calcul, sélectionne la cellule dans laquelle tu veux utiliser la fonction personnalisée
Insérer une formule

le problème avec une formule personnalisée est sa mise à jour qu'il faut forcer en utilisant la touche F9 ou ajouter dans les propriétés de ta feuille ce bout de code (clic droit sur l'onglet de ta feuille/Visualiser le code) et colle ce bout de code supplémentaire

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Calculate
End Sub
0

Discussions similaires

somme dans excel toujours =0
faissalc -
Olivier -

20 réponses
Excel, Formule =SOMME ne fonctionne pas
Damien -
speug -

9 réponses
somme.si.ens critere entre deux dates
texas4229 -
Ariel7 -

11 réponses
RECHERCHEV additionne les plusieurs lignes du meme nom
pfl.bourde -
pfl.bourde -

2 réponses
Mise en forme Conditionnelle sous Powerpoint
TI2509 -
m@rina -

1 réponse