farvede fælter sammen lægning

På Tommy Baks hjemmeside finder du nogle formler til formålet.
Se http://tommy.bak.homepage.dk/

ja jeg jeg har kikket meget på den side.....
men jeg forstår den ikke .....skal bare have talt antallet af farvede felter(grå) sammen.
det kan jeg ikke rigtigt løse der syntes jeg ?

Jamen så for du lige en introduktion:

Baks funktion til at tælle farvede celler skal lige ændres en smule til:

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 Then
            dCount = dCount + 1
        End If
    Next rCell
    ColorCount = dCount
End Function

Tryk ALT+F11 for at komme ind i VBA-editoren.
Her skal du indsætte et modul (menupunkt findes i Indsæt-menuen)

Nu kan du gå tilbage til dit ark og skrive formlen f.eks.:
=ColorCount(A9:L9;A9)

A9:L9 er det område, hvor du ønsker at tælle de grå celler.
Det sidste argument A9 er eksempel på en celle, som indeholder den farve du ønsker at evaluere på.

For at løse dit problem fuldt ud, skal din formel se sådan ud:
=30-ColorCount(A9:L9;A9)

Hov, jeg sprang vist lige et punkt over:
Når du har indsat et ny modul skal du indsætte ovenstående kode i modulet (klippe/klistre).

Nå jeg kan se, at ovenstående kode er identisk med den funktion, som på baks side hedder =ColorCell.

ok 1000 tak jan der forstod jeg den *S*

ja den er jo også fint kan godt få det til at køre
men den regner det ikke ud aytomatiskt jeg skal op og klikke på formele i cellen før det sker
kan det ikke lade sig gøre automatiskt som ved andre beregninger

Du kan nøjes med at trykke på F9, så opdateres den.
Et farveskift betragtes nemlig ikke så en ændring i excel, og derfor genberegnes der ikke ved farveskift, men den kan gennemtvinges med F9.

jammen 1000 tak endu en gang