Brojanje ćelija u boji ?

[ my name is bond @ 08.04.2009. 13:37 ] @

Kako da u excel (2007) tabeli izbrojim ćelije u redu koje su obojene ( prazne su , u njima nema nikakva tekst. ili brojčana vrednost).

[ Jpeca @ 08.04.2009. 14:28 ] @

Pogledaj primer koji je postavio 3okc sa upotrebom korisničke funkcije http://www.elitesecurity.org/t231552-0#1775026

[ jakov1 @ 21.04.2009. 13:43 ] @

Filtriras po boji.

[ my name is bond @ 23.04.2009. 12:37 ] @

Na ovakvu tabelu sam mislio.
To je tabela - kalendar - i svaka obojena ćelija je znak da je taj radnik tog dana radio.Znači treba mi ona krajnja kolona - ukupno radio dana u tom mesecu - da mi excel upiše automatski.

[ timmy @ 24.04.2009. 06:26 ] @

Ok. Ajde da probamo ovako:

1. Otvor VB Editor sa Alt+F11
2. Dodaj novi modul sa Insert/Module
3. Dodaj sledeci kod

Code:

Public Function CountColor(r As Range) As Long
Dim lNum As Long
Dim cellA As Range
    Application.Volatile
    For Each cellA In r
        If cellA.Interior.Pattern <> xlNone Then lNum = lNum + 1
    Next cellA
    CountColor = lNum
End Function

4. Napisi u AK3

Code:

=countcolor(D3:AH3)

5. Kopiraj ovu formulu do AK47 ;))) tj. do AK32

Kada "farbas" celije, da bi se ova formula ponovo izracunala moraces da pritisnes F9 ili da negde promenis
vrednost u nekoj celiji jer Excel nece da izracunava formule kada se promeni format u celijama.

Pozdrav

[ my name is bond @ 24.04.2009. 11:34 ] @

To je baš to.Hvala @timmy

[ jakov1 @ 24.04.2009. 14:45 ] @

Citat:

timmy: Ok. Ajde da probamo ovako:

1. Otvor VB Editor sa Alt+F11
2. Dodaj novi modul sa Insert/Module
3. Dodaj sledeci kod

4. Napisi u AK3

Code:

=countcolor(D3:AH3)

SVAKA CAST!!!