Kako brojati stanice s bojom u programu Excel?
Postoji više načina na koje možemo brojati stanice na temelju boje stanice u Excelu.
- Metoda # 1 - Brojanje ćelija bojom pomoću metode filtra s ukupnom funkcijom
- Metoda # 2 - Brojanje ćelija bojom stvaranjem funkcije pomoću VBA koda
Sada ćemo detaljno razgovarati o svakoj od metoda zajedno s primjerom -
# 1 Korištenje metode filtra s ukupno funkcijom
Kao što sam rekao, imamo više metoda za brojanje stanica na temelju boje stanice u excelu. Ova metoda koristi funkciju Filter & Subtotal.
- Korak 1: Prvo, moramo primijeniti funkciju međuzbroja, pa na kraju podataka otvorite funkciju SUBTOTAL u excelu.
- Korak 2: Jednom kada otvorimo funkciju SUBTOTAL, pod tim ćemo dobiti popis funkcija; budući da brojimo stanice, odaberite funkciju " 2 - COUNT ".
- Korak 3: Nakon što odaberemo sljedeću metodu međuzbroja, moramo odabrati raspon stanica koje ćemo brojati.
- Korak 4: U redu, sada će broj ovih stanica biti 7.
- Korak 5: Za gornje podatke struktura primjenjuje opciju filtra.
- Korak 6: Kliknite padajući popis filtara da biste prešli na " Filtriranje po boji". Pojavit će se sve dostupne boje za filtriranje.
- Korak 7: Odaberite bilo koju boju, a mi ćemo imati te obojene redove.
- Korak 8: Kao što vidite gore, naša SUBTOTAL funkcija prikazuje broj samo filtriranih redaka. Budući da su samo dva retka označena narančastom bojom, funkcija SUBTOTAL prikazuje broj samo kao tri; slično, odaberite drugu boju i provjerite radi li savršeno ili ne.
Ovo je 2, pa imamo ažurirani rezultat.
# 2 Stvaranje funkcije pomoću VBA kodiranja
Kao što sam vam rekao, nažalost, nemamo nijednu ugrađenu funkciju koja nam može pomoći u brojanju stanica na temelju boje u excelu. Rekli smo da nema ugrađene funkcije, ali ljepota je u tome što možemo stvoriti vlastitu funkciju pomoću VBA kodiranja.
Ispod je kod koji sam već napisao kako bih stvorio funkciju za brojanje stanica na temelju boje.
Kodirati:
Funkcija ColorCount (ColorCell As Range, DataRange As Range) Dim Data_Range As Range Dim Cell_Color As Long Cell_Color = ColorCell.Interior.ColorIndex Za svaki Data_Range u DataRange If Data_Range.Interior.ColorIndex = Cell_Color Onda ColorCount = EndCount_Range = Kraj podataka, ColorCount = EndCountR, ColorCount, ColorCount Funkcija
Sve što morate učiniti je kopirati gornji kod i zalijepiti ga u vaš VBA modul, kao što je prikazano dolje.
Sada se vratite na radni list gdje imamo podatke i stvorimo tri ćelije s bojom.
Stavite znak jednakosti i otvorite funkciju koju smo stvorili pomoću gornjeg koda.
Prvi argument s ovom funkcijom je "moramo odabrati ćeliju boje koju trebamo brojati", pa ću u ovom slučaju odabrati E2 ćeliju.
Drugi je argument u kojem opsegu stanica trebamo brojati odabranu boju stanice.
OK, to je sve što nam treba za ovu funkciju. Zatvorite zagradu i pritisnite tipku Enter da biste dobili broj odabrane boje ćelije.
Slično, učinite za ostale obojene stanice. Dobivamo sljedeći rezultat.
To se postiže korištenjem VBA " Korisnički definirane funkcije" , provući će se kroz ponuđeni raspon ćelija i brojati broj ćelija koje imaju točno istu boju kao i navedena boja ćelije.
Tada će zbrojiti sve podudarne ćelije boje i vratiti rezultat kao broj te ćelije boje.
Ovako, u Excel možemo brojati stanice s bojama. Postoje i druge metode, ali one su malo komplicirane, pa na početku učenja idite na onu laku.
Stvari koje treba ovdje zapamtiti
- Funkcija SUBTOTAL broji samo stanice koje su vidljive, pa će primijenjeni filtar brojati samo one filtrirane obojene stanice.
- VBA kôd je za UDF funkciju, jer nema ugrađenih funkcija, pa moramo stvoriti vlastiti.
