Macro Couleur Excel

Bonjour à tous,

Je souhaiterais savoir s'il est possible était possible de créer des macros sous Excel en faisant références à des couleurs de cellules.

Je m'explique, dans une colonne j'ai plusieurs valeurs en euro correspondantes à plusieurs produits.
selon les caractéristique des produits la couleur de cellule est différente.
Je voudrais faire la somme des valeurs selon la couleur de cellule.

J'espère avoir été clair

Merci pour vos réponses ;-)

@+

lysandre

Bonjour et bienvenue

Avec ces deux fonctions, tu peux y arriver

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Function CouleurCellule(Cellule As Range) Application.Volatile CouleurCellule = Cellule.Cells(1, 1).Interior.Color End Function   Function SommePlageCouleurs(Plage As Range, Couleur As Long) Application.Volatile Dim Cellule As Range   For Each Cellule In Plage If Cellule.Interior.Color = Couleur And IsNumeric(Cellule.Value) Then _ SommePlageCouleurs = SommePlageCouleurs + Cellule.Value Next Cellule End Function

---

Tu peux alors les utiliser au sein d'une formule

Citation:

---

=SommePlageCouleurs(G2:G6;CouleurCellule(G3))

---

Attention que pour être certain de la valeur renvoyée, il faut recalculer...