Fonction somme.si par rapport à la couleur de cellule

Bonjour edou,

En macro VBA, ça donne :

Option Explicit

Sub SommeSiPasJaune()
    Dim Col As Integer, LigPre As Integer, LigDer As Integer, i As Integer
    Dim TotalSansJaune As Double
    '
    Col = 1
    LigPre = 1
    LigDer = Columns(Col).Find("*", , , , xlByColumns, xlPrevious).Row
    TotalSansJaune = 0
    For i = LigPre To LigDer
        Cells(i, Col).Select
        If (Selection.Interior.ColorIndex <> 36) Then
            TotalSansJaune = TotalSansJaune + Cells(i, Col).Value
        End If
    Next i
    Cells(1, 3).Value = TotalSansJaune
End Sub

Si la cellule n'est pas de couleur 36 (jaune)

Salut,

par formule difficile si tu colorises tes cellules manuellement, pour cela il faudrait utiliser la mise en forme conditionnelle.
Exemple dans ton tableau tu attribus dans ta mise en forme une couleur à une lettre exemple A pour absent ensuite il suffit de compter les a avec une simple formule
=NB.SI(B1:B10;"A")
si tu as besoin d'un petit montage fait signe