Kako šteti celice z barvo v Excelu?
Obstaja več načinov, kako lahko celice preštejemo glede na barvo celice v Excelu.
- Metoda # 1 - Štetje celic z barvo z uporabo metode filtra s funkcijo Sub Total
- 2. način - štetje celic z barvo z ustvarjanjem funkcije z uporabo kode VBA
Zdaj pa podrobno razpravljajmo o vsaki od metod skupaj s primerom -
# 1 Uporaba metode filtra s funkcijo Sub Total
Kot sem rekel, imamo več načinov za štetje celic glede na barvo celice v Excelu. Ta metoda uporablja funkcijo Filter & Subtotal.
- 1. korak: Najprej moramo uporabiti funkcijo vmesnega seštevka, zato na koncu podatkov v Excelu odprite funkcijo SUBTOTAL.
- 2. korak: Ko odpremo funkcijo SUBTOTAL, dobimo seznam funkcij pod tem; ker štejemo celice, izberite funkcijo “ 2 - COUNT ”.
- 3. korak: Po naslednji izbiri metode vmesnega seštevka moramo izbrati obseg celic, ki jih bomo prešteli.
- 4. korak: V redu, zdaj bo število teh celic 7.
- 5. korak: Za zgornje podatke struktura uporabi možnost filtra.
- 6. korak: Kliknite spustni seznam filtrov in pojdite na » Filtriranje po barvi«. Prikazane bodo vse razpoložljive barve za filtriranje.
- 7. korak: Izberite katero koli barvo in dobili bomo te barvne vrstice.
- Korak 8: Kot lahko vidite zgoraj, naša funkcija SUBTOTAL prikazuje samo število filtriranih vrstic. Ker sta z oranžno barvo označeni le dve vrstici, funkcija SUBTOTAL prikazuje število samo kot tri; podobno izberite drugo barvo in preverite, ali deluje popolnoma ali ne.
To število je 2, zato imamo posodobljen rezultat.
# 2 Ustvari funkcijo z uporabo VBA kodiranja
Kot sem vam že povedal, žal nimamo nobene vgrajene funkcije, ki bi nam lahko pomagala pri štetju celic glede na barvo v excelu. Povedali smo, da vgrajene funkcije ni, a lepota je v tem, da lahko z uporabo kodiranja VBA ustvarimo lastno funkcijo.
Spodaj je koda, ki sem jo že napisal za ustvarjanje funkcije za štetje celic glede na barvo.
Koda:
Funkcija ColorCount (ColorCell As Range, DataRange As Range) Dim Data_Range As Range Dim Cell_Color As Long Cell_Color = ColorCell.Interior.ColorIndex Za vsak Data_Range In DataRange Če Data_Range.Interior.ColorIndex = Cell_Color Nato ColorCount = EndCountRandCountRandCountRandCountRandCountRandCareRandCare Funkcija
Vse, kar morate storiti, je, da kopirate zgornjo kodo in jo prilepite v svoj modul VBA, kot je prikazano spodaj.
Zdaj se vrnite na delovni list, kjer imamo podatke, in ustvarite tri celice z barvo.
Postavite znak enakosti in odprite funkcijo, ki smo jo ustvarili z uporabo zgornje kode.
Prvi argument s to funkcijo je "izbrati moramo barvno celico, ki jo moramo prešteti," zato bom v tem primeru izbral celico E2.
Drugi argument je, v katerem obsegu celic moramo šteti izbrano barvo celic.
V redu, to je vse, kar potrebujemo za to funkcijo. Zaprite oklepaj in pritisnite tipko Enter, da dobite število izbrane barve celice.
Podobno naredite za druge barvne celice. Dobili smo naslednji rezultat.
To se naredi z uporabo uporabniško določene funkcije VBA , ki bo zavila skozi določen obseg celic in preštela število celic, ki imajo natančno enako barvo kot navedena barva celice.
Nato sešteje vse ujemajoče se barvne celice in vrne rezultat kot štetje te barvne celice.
Tako lahko v Excelu štejemo celice z barvami. Obstajajo tudi druge metode, ki pa so nekoliko zapletene, zato se odločite za enostavno na začetku učenja.
Tukaj si je treba zapomniti
- Funkcija SUBTOTAL šteje samo celice, ki so vidne, tako da bo kot uporabljeni filter štela samo tiste filtrirane barvne celice.
- Koda VBA je za funkcijo UDF, ker ni vgrajenih funkcij, zato moramo ustvariti svojo.
