IZBORNIK HOME FORUM ACCESS 2003 EXCEL 2003 WORD 2003  .
   
   
HOME
FORUM Win Tips&Tricks
   
KAKO INSTALIRATI
WINDOWS XP ?
Kako instalirati Win XP sa USB STICKA
Kako instalirati WINDOWS 7 ?
Naučite za 15 minuta raditi u Windows XP
Naučite Internet Explorer i Outlook Express
za 15 minuta
Kako kreirati BOOT CD za instalaciju Win95
   
MS OFFICE 2003
MS OFFICE 2007
   
   
HOME NETWORK
tutorijal za mreže
Network Windows 7 - XP
   
ZANIMLJIVI LINKOVI
BROJEVNI SUSTAVI
(DEC, OKT, BIN, HEX )
CMD - Command Prompt
CISCO - CCNA tutoriali
VLSM and SUBNETTING
   
Tutorijali za phpBB forum
JAVASCRIPT
VISUAL BASIC 6.0
AUTOCAD 2007
 
-
MICROSOFT EXCEL 2007 - Brojanje ćelija u boji,  Counting color cells in Excel, Kako izbrojati ćelije u boji u Excelu, How to count color cells

Kako izbrojati ćelije u boji u Excelu
(How to count color cells)

Search This Web Site




Kako izbrojiti obojane ćelije, koliko je ćelija u boji

BROJANJE ĆELIJA U BOJI

U ćeliji D13 imamo formulu =SUMPRODUCT(1*($C$2:$C$10=4)) koja broji sve ćelije u rasponu C2:C10 a koje imaju broj boje 4. Dakle ova formula će rezultirati koliko je ćelija iste boje (zelene) u stupcu B, a za računanje koristi raspon C2:10 jer nam se brojevi boja nalaze u range (rasponu) C2:C10

U ovom slučaju nemojte se obazirati na ćelije B13, B14 i B15 one su samo tu radi primjera da vidite za koje boje se računa SUM i COUNT. Naravno stupac C tj. stupac u kojem se nalaze brojevi za boje (ColorIndex) uvijek možete sakriti (Hidden) ako vam smeta za izgled vaše tablice

BTW: Stupac C tj. formule za broj boje možete postaviti na neki drugi radni list (Sheet) tako da vam ne smetaju u tablici na kojoj radite, ali tada i formule trebate prilagoditi toj situaciji.

Source code iz ovog primjera u Module1

Function BGCol(MRow As Integer, MCol As Integer) As Long
BGCol = Cells(MRow, MCol).Interior.ColorIndex
End Function

NAPOMENA: AKo radite sa ćelijama u boji preko VBA coda tada refresh F9 ne vrijedi uvijek već je potrebno nakon svake promjene pritisnuti kombinaciju CTRL+ALT+F9. Boje dobivene sa Conditional Formatting (Uvjetno oblikovanje) nemaju utjecaja na ove radnje i boju uvijek trebate postavljati sa izbornika boja.


KAKO IZBROJATI ĆELIJE SA ODREĐENOM BOJOM

U ćeliji D13 imamo formulu =SUMPRODUCT(1*($C$2:$C$10=3407718)) koja broji sve ćelije u rasponu C2:C10 a koje imaju broj boje 3407718. Dakle ova formula će rezultirati koliko je ćelija iste boje (zelene) u stupcu B, a za računanje koristi raspon C2:10 jer nam se brojevi boja nalaze u range (rasponu) C2:C10

U ovom slučaju nemojte se obazirati na ćelije B13, B14 i B15 one su samo tu radi primjera da vidite za koje boje se računa SUM i COUNT. Naravno stupac C tj. stupac u kojem se nalaze brojevi za boje (ColorIndex) uvijek možete sakriti (Hidden) ako vam smeta za izgled vaše tablice

BTW: Stupac C tj. formule za broj boje možete postaviti na neki drugi radni list (Sheet) tako da vam ne smetaju u tablici na kojoj radite, ali tada i formule trebate prilagoditi toj situaciji.

Source code iz ovog primjera u Module1

Function BGColR(MyRef As Range) As Long
Application.Volatile (True)
BGColR = MyRef.Interior.Color
End Function

 

NAPOMENA: AKo radite sa ćelijama u boji preko VBA coda tada refresh F9 ne vrijedi uvijek već je potrebno nakon svake promjene pritisnuti kombinaciju CTRL+ALT+F9. Boje dobivene sa Conditional Formatting (Uvjetno oblikovanje) nemaju utjecaja na ove radnje i boju uvijek trebate postavljati sa izbornika boja.


Adsense sponzor



KAKO PREBROJATI KOLIKO JE ĆELIJA ODREĐENE BOJE

U ćeliji D13 imamo formulu =ColorFunction($B$13;$B$2:$B$10;FALSE) ili =ColorFunction($B$13;$B$2:$B$10) koja broji sve ćelije u rasponu B2:B10. Dakle ova formula će rezultirati koliko je ćelija iste boje (zelene) u stupcu B za naš range (raspon), a za računanje koristi VBA kod koji smo kopirali u VBE (Visual Basic Editor)

U ovom slučaju ćelije B13, B14 i B15 su nam važne, jer se formule vežu na njih za razliku od prethodnih primjera.

Count and Sum Cells by Color - ColorFunction

NAPOMENA: AKo radite sa ćelijama u boji preko VBA coda tada refresh F9 ne vrijedi uvijek već je potrebno nakon svake promjene pritisnuti kombinaciju CTRL+ALT+F9. Boje dobivene sa Conditional Formatting (Uvjetno oblikovanje) nemaju utjecaja na ove radnje i boju uvijek trebate postavljati sa izbornika boja.

Source code iz ovog primjera u Module1

Function ColorFunction(rColor As Range, rRange As Range, Optional SUM As Boolean)
Dim rCell As Range
Dim lCol As Long
Dim vResult
''''''''''''''''''''''''''''''''''''''
'Written by Ozgrid Business Applications
'www.ozgrid.com
'Sums or counts cells based on a specified fill color.

'''''''''''''''''''''''''''''''''''''''
lCol = rColor.Interior.ColorIndex
If SUM = True Then
For Each rCell In rRange
If rCell.Interior.ColorIndex = lCol Then
vResult = WorksheetFunction.SUM(rCell, vResult)
End If
Next rCell
Else
For Each rCell In rRange
If rCell.Interior.ColorIndex = lCol Then
vResult = 1 + vResult
End If
Next rCell
End If
ColorFunction = vResult
End Function




Brojanje ćelija u boji bazirane na Uvjetnom oblikovanju (How to counting color cells formated by Conditional Formatting)

U ovom primjeru brojanja ćelija u boji uočimo da su ćelije u rasponu A1:A10 ispunjene podacima. U rasponu kriterija C2:F2 popunjavamo neke podatke a na osnovu popunjenih podataka Conditional Formatting (CF) će obojati ćelije u range A1:A10. U ovom slučaju uočite da sve ćelije koje smo uvjetovali u C2:F2 nisu obojane u stupcu A. Postavlja se pitanje kako izbrojati sve ćelije u boji koje su uvjetovane sa Conditional Formatting. Rješenje u ćeliji D7 je matrična ili ARRAY formula =SUM(IF(COUNTIF($C$2:$F$2;A1:A10)=0;1;0)) koju završavate sa Ctrl+Shift+Enter

Kako izbrojiti ćelije u boji koje su formatirane sa Conditional Formatting ili uvjetno oblikovanje

Adsense sponzor



.

Adsense sponzor



Download primjera iz ovog tutorijala Excel Book1, Microsoft Excel Book2, Excel Book3, Microsoft Excel Book4
 

Teme vezane za ćelije u boji

- Uvjetno oblikovanje u Excelu 2003
-
Conditional formatting u Excelu 2007
-
Sortiranje ćelija u boji
-
Zbrajanje vrijednosti u ćelijama u boji
-
Kako pronaći podatak u tablici i obojati ćeliju ili red bojom
- Kako obojati ćeliju nakon unosa specifičnog ili određenog teksta ili broja i pritiska na tipku ENTER
- Kako saznati određeni broj koda za specifičnu boju u VBA
- Kako obojati kao uvjet ćelije koje treba popuniti





©- 2006 - 2020 - IvanC  - Sva prava pridržana.  ic.ims.hr