Sujet Précédent Sujet Suivant

Exploitation excel

Fermé
georges - 3 juil. 2005 à 19:05
Armojax Messages postés 1860 Date d'inscription mercredi 19 janvier 2005 Statut Membre Dernière intervention 2 octobre 2024 - 3 juil. 2005 à 19:54
bonjour.
comment sommer sur excel tous les cellules dons les chiffres sont de couleur (ex: rouge)
georges.garia@wanadoo.fr

merci
A voir également:

1 réponse

Réponse 1 / 1
Armojax Messages postés 1860 Date d'inscription mercredi 19 janvier 2005 Statut Membre Dernière intervention 2 octobre 2024 1 528
3 juil. 2005 à 19:54
Bonsoir Georges,

Il n'existe pas, à ma connaissance, de fonction standard qui fasse ça.
Tu peux utiliser une petite macro du genre ci-dessous. Je l'ai appelée SUMCOLOR.
On lui passe en paramètres :
- la plage sur laquelle on veut faire la somme
- le code de la couleur à prendre en compte (3 pour le rouge dans l'exemple).

=SUMCOLOR(A1:B12;3)
fait la somme des chiffres en rouge dans la plage (A1:B12).

Voici le code :
Function SUMCOLOR(Plage As Range, Couleur As Integer) As Double
  Dim Cellule As Range
  SUMCOLOR = 0
  For Each Cellule In Plage
    If Cellule.Font.ColorIndex = Couleur Then
      SUMCOLOR = SUMCOLOR + Cellule.Value
    End If
  Next
End Function
0