Somme à calculer selon la couleur

Bonjour,

je débute sur Excell.

J'ai fait une liste de factures

Colonne 1----------- Colonne 2 ----------- Colonne 3----------- Colonne 4

Date ----------- Carrefour ----------- 1500 € ----------- Couleur Rouge/vert (selon si c'est payé ou non)

Et j'ai une cellule somme qui reprend tout ce qui est en rouge (que je fais manuellement :'( )

Ma question est : Est-il possible de créer une formule qui reconnait les couleurs.

Ainsi je fais la somme de toutes mes cellules colorées, et les cellules vertes ne sont pas comptées.

Bonjour. Bienvenue sur le Forum

L'exemple joint

Cordialement

Bonjour Amadeus,

Je ne m'attendais pas à une réponse si rapide.

Je vais tester tout ca en espérant que je comprenne bien ce qui doit être fait

Bonne journée 8)

Bonsoir ,

Désolé de ressortir ce sujet qui date de quelques années mais je n'arrive pas à faire une sommes exacte des cellules d'une même couleur !!

La somme des valeurs contenues dans les cellules est arrondie et ne tient pas compte des décimales lorsqu'il y en a.

Merci pour votre aide .

Bonsoir,

Il te suffit de remplacer dans la fonction SommeSiCouleur sa déclaration de Long en Double

Function SommeSiCouleur(Plage As Range, NumeroDeCouleur%) As Double
Application.Volatile True
Dim wCell As Range
For Each wCell In Plage
If wCell.Interior.ColorIndex = NumeroDeCouleur Then
SommeSiCouleur = SommeSiCouleur + wCell.Value
End If
Next
End Function

Bonsoir Marco

Une fois sur ton fichier, fais ALT+F11 et rentre dans l'éditeur visual basic,

ensuite clic module 1 ou 2 repère cette ligne qui ressemble à ça :

Function SommeSiCouleur(Plage As Range, NumeroDeCouleur%) As variant

et remplace là par :

Function SommeSiCouleur(Plage As Range, NumeroDeCouleur%) As Double

Bonne soirée.

je suis arrivé trop tard .....

Bonsoir et un grand merci à vous M12 et Cordias , pour votre rapidité !!