Spalvų naudojimas darbaknygėje yra puikus būdas padaryti ją patrauklesnę. Tačiau, kadangi "Excel" programoje nėra jokios integruotos funkcijos spalvotoms ląstelėms suskaičiuoti, žmonės paprastai vengia spalvotų ląstelių. Tačiau tai galima padaryti naudojant keletą gudrybių. Šiame straipsnyje parodysime, kaip suskaičiuoti spalvotas ląsteles "Excel" programoje.

Atsisiųsti praktikos šabloną

Nemokamą praktinį "Excel" šabloną galite atsisiųsti iš čia ir praktikuotis savarankiškai.

Spalvotų langelių skaičiavimas "Excel" programoje Excel.xlsm

4 paprasti būdai skaičiuoti spalvotas ląsteles "Excel" programoje

Šiame skyriuje sužinosite, kaip "Excel" skaičiuoti spalvotus langelius naudojant "Excel" komandų įrankius ir vartotojo apibrėžtas funkcijas (UDF).

1. Naudokite komandą "Find & Select" spalvotoms ląstelėms skaičiuoti programoje "Excel

Svetainė Rasti ir pasirinkti komanda yra viena iš naudingiausių "Excel" įrankių, skirtų bet kokioms su "Excel" susijusioms užduotims atlikti. Čia ją panaudosime spalvotoms ląstelėms "Excel" skaičiuoti.

Panagrinėkime toliau pateiktą duomenų rinkinį, kuriame yra trys duomenų kategorijos, kategorijos: Vaisiai, Gėlės ir Maistas. Kiekviena kategorija išskiriama skirtingomis spalvomis. Vaisių kategorija deklaruojama spalva Mėlyna , kategorija Gėlė in Oranžinė ir kategorijoje Maistas nėra fono spalvų.

Dabar sužinosime, kaip sužinoti, kiek kiekvienos spalvos yra kiekviename kiekvienos kategorijos langelyje.

Žingsniai:

• Pasirinkite duomenų rinkinį su spalvotais langeliais.
• Į Redagavimo skirtukas , pasirinkite Rasti ir pasirinkti -> Rasti

• Iš iššokantis langas Rasti ir pakeisti langelį, spustelėkite Parinktys .

• Kitame iššokančiame lange Rasti ir pakeisti spustelėkite išskleidžiamąjį sąrašą Formatas -> Pasirinkite formatą iš ląstelės .

• Bus rodomas keturių dimensijų pliuso simbolis. Uždėkite šį simbolį ant bet kurios spalvos langelio ir spustelėkite jį (mes pasirinkome mėlyną spalvą).

• Vėl pasirodys iškylantysis langas "Rasti ir pakeisti" ir pastebėsite, kad Peržiūra* etiketės langelis bus užpildytas spalva, panašia į anksčiau pasirinktos ląstelės spalvą.
• Spustelėkite Rasti viską .

Gausite visą informaciją apie nurodyti spalvoti langeliai kartu su tos spalvos ląstelių skaičiumi.

Taip pat galite suskaičiuoti visus kitus spalvotus "Excel" darbalapio langelius.

Skaityti daugiau: Kaip suskaičiuoti spalvotus langelius "Excel" be VBA (3 metodai)

2. Taikykite filtrus ir funkciją SUBTOTAL programoje "Excel", kad suskaičiuotumėte spalvotus langelius

Naudojant "Excel Filtras įrankis ir įterpiant SUBTOTALĖ funkcija yra dar vienas veiksmingas būdas skaičiuoti spalvotus langelius "Excel" programoje. Ją taip pat galime panaudoti skaičiuodami spalvotus langelius "Excel" programoje.

Panagrinėkime toliau pateiktą duomenų rinkinį, kuris yra nuspalvintas pagal kategoriją. Dabar išmoksime veiksmus, kaip sužinoti šių nuspalvintų langelių skaičių "Excel" programoje, naudodami Filtrai ir Funkcija SUBTOTAL .

Žingsniai:

• Kitoje darbalapio ląstelėje įrašykite SUBTOTALĖ formulė,

Čia,

102 = Nurodytame intervale matomų ląstelių skaičius.

B5:B16 = Spalvotų langelių diapazonas.

• Gausite bendrą spalvotų lapo langelių skaičių (pvz., turime 12 langelių su fono spalvomis, todėl SUBTOTALĖ davė mums išvestį 12 ).

• Tada pasirinkite tik duomenų rinkinio antraštes.
• Eikite į Duomenys -> Filtras .

• Kiekvienoje duomenų rinkinio antraštėje bus įterptas išskleidžiamas mygtukas.

• Paspauskite išskleidžiamąjį mygtuką, esantį stulpelio, kuriame yra spalvotų langelių (pvz., Produkto pavadinimas), antraštėje.
• Iš išskleidžiamajame sąraše pasirinkite Filtruoti pagal spalvą ir į papildomą sąrašą gausite visas duomenų rinkinio spalvas.

• Spustelėkite spalvą, kurią norite skaičiuoti (pvz., mes pasirinkome mėlyną spalvą).
• Bus rodomos tik tos ląstelės, kurios nuspalvintos nurodyta spalva, kartu su tų ląstelių skaičiumi. SUBTOTALĖ rezultatų ląstelės (pvz., mūsų duomenų rinkinyje yra 4 mėlynos spalvos ląstelės).

• Taip pat galite suskaičiuoti visus kitus spalvotus savo darbalapio langelius "Excel" programoje (pvz., kai iš išskleidžiamajame sąraše pasirinkome oranžinę spalvą, mums buvo pateiktos oranžine spalva nuspalvintos ląstelės, o kadangi mūsų duomenų rinkinyje yra 5 oranžine spalva nuspalvintos ląstelės, todėl SUBTOTALĖ rezultatas pagaminta ląstelė 5 )

Skaityti daugiau: Ląstelių skaičiavimas pagal spalvą naudojant "Excel" sąlyginį formatavimą (3 metodai)

3. Įgyvendinkite GET.CELL 4 makrokomandą ir COUNTIFS funkcijas programoje "Excel", kad suskaičiuotumėte spalvotas ląsteles

Naudojimas "Excel 4.0" makrokomandos funkcijos yra ribotos dėl jų suderinamumo ir sudėtingumo priežasčių. Kita priežastis yra ta, kad tai yra sena "Excel" makrokomandos funkcija, todėl trūksta kai kurių naujų funkcijų. Tačiau jei jums vis dar patogu dirbti su EXCEL 4.0 makrokomandos , tada padėsime jums panaudoti spalvotų langelių skaičiavimo funkciją "Excel" programoje.

Naudodami tą patį duomenų rinkinį, su kuriuo atlikome praktiką, išmoksime įgyvendinti Makro 4 funkcija skaičiuoti spalvotas ląsteles "Excel" programoje.

• Eikite į Formulės -> Apibrėžti pavadinimą .

• Į Naujo pavadinimo iškylantysis langas , parašykite šiuos žodžius,
  • Pavadinimas: GetColorCode (tai vartotojo nustatytas pavadinimas)
  • Apimtis: darbo knyga
  • Nurodo: =GET.CELL(38,GetCell!$B5)

Čia,

GetCell = lapo, kuriame yra jūsų duomenų rinkinys, pavadinimas

$B5 = Stulpelio su fono spalva nuoroda.

• Spustelėkite GERAI

Dabar turite naudotojo apibrėžtą formulę, =GetColorCode .

• Šalia duomenų esančiame laukelyje įrašykite formulę ir paspauskite Įveskite .
• Bus gautas skaičius (pvz. 42 ).

• Dabar vilkite ląstelę žemyn Užpildymo rankena taikyti tą pačią formulę likusioms ląstelėms.

Formulė grąžins konkrečius skaičius, nurodytus spalvomis. Taigi visos ląstelės su ta pati fono spalva, bus gautas tas pats skaičius. , o jei fono spalvos nėra, formulė grąžins 0.

• Dabar apibrėžkite šias spalvas kitose to paties darbalapio ląstelėse, kad gautumėte skaičių.

Daugiau informacijos rasite toliau pateiktame paveikslėlyje.

Sukūrėme lentelę, pavadintą Spalvų skaičius, ir toje lentelėje apibrėžėme Ląstelės G5 ir G6 pagal mūsų spalvą Mėlyna ir Oranžinė atitinkamai, o šalia jų esančius langelius ( Ląstelės H5 & H6 ) tuščios, kad galėtume gauti spalvotų ląstelių skaičių tose ląstelėse.

• Ląstelėje, kurioje bus spalvotos ląstelės skaičius, įrašykite šią formulę,

Čia,

$E5:$E$16 = spalvos kodo, kurį gavome iš naudotojo apibrėžtos formulės, diapazonas.

• Paspauskite Įveskite .

Gausite spalvomis apibrėžtų langelių skaičių (pvz., mūsų duomenų rinkinyje yra 4 mėlynos spalvos langeliai, todėl šalia Mėlyna spalvos apibrėžtas langelis ( G5 ), jis pateikia mums skaičių 4 ).

• Dabar vilkite langelį per visą stulpelį Užpildymo rankena norėdami gauti visų spalvotų darbalapio langelių skaičių.

Kadangi turime 5 langelius, nuspalvintus Oranžinė mūsų duomenų rinkinyje naudotojo apibrėžtas GetColorCode formulė davė mums skaičių 5 .

4. Įterpti VBA kodą (vartotojo apibrėžtą funkciją) spalvotoms ląstelėms skaičiuoti "Excel" programoje

Įgyvendinant VBA kodas atliekant su "Excel" susijusias užduotis yra saugiausias ir veiksmingiausias metodas, todėl iš naudotojų reikalauja aukštesnio lygio įgūdžių. Ir nepamirškite apie naujas funkcijas, kurias minėjome ankstesniame Makro 4 skyrius, gerai, VBA yra pažanga "Excel 4.0" makrokomandos .

Pradėkime įgyvendinti VBA kodą, skirtą spalvotoms ląstelėms "Excel" skaičiuoti.

Žingsniai:

• Paspauskite Alt + F11 klaviatūroje arba eikite į skirtuką Programuotojas -> "Visual Basic atidaryti "Visual Basic" redaktorius .

• Iššokančiame kodo lange meniu juostoje spustelėkite Insert -> Modulis .

• Nukopijuokite šį kodą ir įklijuokite jį į kodo langą,

   Funkcija Count_Colored_Cells(ColorCells As Range, DataRange As Range) Dim Data_Range As Range Dim Cell_Color As Long Cell_Color = ColorCells.Interior.ColorIndex For Each Data_Range In DataRange If Data_Range.Interior.ColorIndex = Cell_Color Then Count_Colored_Cells = Count_Colored_Cells + 1 End If Next Data_Range End Function 

Tai nėra papildoma procedūra, skirta VBA paleisti programą, tai yra sukurti Vartotojo apibrėžta funkcija (UDF) . Taigi, parašius kodą, nespauskite mygtuko Vykdyti mygtuką iš meniu juostos.

• Dabar grįžkite į duomenų rinkinį ir apibrėžkite langelius su spalvomis, kaip tai darėme ankstesniame metode.
• Kad geriau suprastumėte, pažvelkite į toliau pateiktą paveikslėlį.

• Ląstelėje įrašykite šią formulę,

Čia,

Count_Colored_Cells = vartotojo apibrėžta funkcija, kurią sukūrėte VBA kodas ( Count_Colored_Cells , pirmoje kodo eilutėje).

E5 = Mėlynos spalvos ląstelė

$B5:$B$16 = duomenų rinkinio diapazonas su spalvotais langeliais.

• Paspauskite Įveskite .

Gausite spalvomis apibrėžtų langelių skaičių (pvz., mūsų duomenų rinkinyje yra 4 mėlynos spalvos langeliai, todėl šalia Mėlyna spalvos apibrėžtas langelis ( E5 ), jis pateikia mums skaičių 4 ).

• Dabar vilkite langelį per visą stulpelį Užpildymo rankena norėdami gauti visų spalvotų darbalapio langelių skaičių.

Kadangi turime 5 langelius, nuspalvintus Oranžinė mūsų duomenų rinkinyje naudotojo apibrėžtas Count_Colored_Cells funkcija suteikė mums skaičių 5 .

Išvada

Šiame straipsnyje parodyta, kaip lengvai suskaičiuoti spalvotus langelius "Excel" programoje. Tikiuosi, kad šis straipsnis jums buvo labai naudingas. Nedvejodami klauskite, jei turite kokių nors su šia tema susijusių klausimų.