Moyenne avec condition sur la couleur des cellules

Bonjour,

Je me permets de poster à nouveau sur le forum car j’ai un nouveau problème !

J’ai un tableau avec des valeurs, au bout du tableau des colonnes mini, maxi et moyenne.

Toutes mes cellules sont blanches.

Je veux faire la moyenne de ces cellules mais au cours du temps je vais en rendre certaines rouges et je ne voudrait faire la moyenne que sur les blanches.

J’espère avoir été clair. En gros j’ai un ensemble de cellule, au cours du temps je vais leur mettre un fond rouge ou leur enlevé et à chaque fois je ne veux que la moyenne sur mes cellules blanches (sauf celles maxi et mini).

Merci beaucoup pour votre aide car je suis coincé !!!

P.S. : en pièce jointe un doc où j’ai essayé de représenté mon tableau.

Bonjour

Pour ce qui est de la Moyenne

Voir Code Feuil1 et Codes Fonctions personnalisées dans Module

Cordialement

Bonjour,

Merci pour votre réponse mais j'ai un petit soucis, quelques fois il m'arrive de ne pas mettre de valeur mais seulement des tirets et à ce moment là la moyenne ne marche plus. Comment faire pour que cela marche (comme dans la moyenne classique).

Je met en pièce jointe le fichier pour montrer se que sa donne.

Merci!

Bonjour

Là, je ne sais pas faire.

Ne pas mettre de tiret serait aussi une solution?

Cordialement

Salut le forum

Remplacement des deux fonctions par une seule.

Function MoyenneCouleur(Plage As Range, Couleur As Long)
Application.Volatile True
Dim Cel As Range
Dim Cpt As Integer, Tot As Double
    Application.Volatile
    For Each Cel In Plage
        If Cel.Interior.ColorIndex = Couleur And IsNumeric(Cel) Then
            Cpt = Cpt + 1
            Tot = Tot + Cel.Value
        End If
    Next Cel
MoyenneCouleur = Tot / Cpt
End Function

Mytå

Bonjour,

Merci pour ta réponse mais je n'ai pas réussi à le faire sous excel, peu tu me montrer un exemple dans le fichier s'il te plait?

Merci!!

Qurlqu'un peut il m'aider s'il vous plait? je suis bloqué et je doit faire cela au plus vite!