Tælle farvede celler med tal i

=ColorSum(D1:D12;D1)
Se evt:
http://gratisupload.dk/vis/672046/

Du er hurtig Store Morten
Men den må kun tælle de røde celler hvor der evt er er 1 tal i, ligesom den kun må tælle de røde med et 2 tal i, nu tæller den summen af de røde cellers indhold

Prøv om denne virker:


=ColorTalCount(C1:C10;A1;A1)

Tæller i område: C1:C10
med farve i: A1
med tallet i: A1

Så retter du bare i koden

Public Function ColorCount(rRange As Range, rColor As Range) As Double
    Dim rCell As Range
    Dim dCount As Double
    dCount = 0
    Application.Volatile
    For Each rCell In rRange
        If rCell.Interior.ColorIndex = rColor.Interior.ColorIndex And rCell = rColor Then
            dCount = dCount + 1
        End If
    Next rCell
    ColorCount = dCount
End Function

Nu tæller den dem som har samme farve og har den værdi der står i Rcolor cellen

Store morten`s var perfekt til mig
Smid et svar
kabbak svar prøver jeg senere

Super...

:-)