Sujet Précédent Sujet Suivant

Exploitation excel

georges -  
Armojax Messages postés 1862 Date d'inscription   Statut Membre Dernière intervention   -
bonjour.
comment sommer sur excel tous les cellules dons les chiffres sont de couleur (ex: rouge)
[email protected]

merci
Configuration: win xp
A voir également:

1 réponse

Réponse 1 / 1
Armojax Messages postés 1862 Date d'inscription   Statut Membre Dernière intervention   1 529
 
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