Přejít k hlavnímu obsahu

Jak filtrovat data podle více barev v aplikaci Excel?

Normálně v aplikaci Excel můžete rychle filtrovat řádky pouze s jednou barvou, ale uvažovali jste někdy o filtrování řádků s více barvami najednou? V tomto článku budu hovořit o rychlém triku pro řešení tohoto problému.

Filtrujte data podle více barev pomocí kódu VBA


šipka modrá pravá bublina Filtrujte data podle více barev pomocí kódu VBA

V aplikaci Excel neexistuje žádný přímý způsob filtrování řádků podle více barev, ale můžete vytvořit kód VBA, který vrátí číslo indexu barev příslušného řádku v novém sloupci, a poté filtrovat řádky podle tohoto pomocného sloupce.

1. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

2, klikněte Vložit > Modula vložte následující kód do Modul Okno.

Kód VBA: Extrahujte číslo indexu barvy:

Function GetColor(x As Range) As Integer
GetColor = x.Interior.ColorIndex
End Function

3. A pak se vraťte zpět do listu a zadejte tento vzorec: = Getcolor (A2)(A2 je barevná buňka, kterou chcete vrátit její číslo barevného indexu) do prázdné buňky kromě vašich dat, viz screenshot:

filtr dokumentů podle více barev 1

4. Poté přetáhněte popisovač výplně dolů do buněk, které chcete získat index barev, a všechna odpovídající čísla indexu barev byla extrahována, jak je znázorněno na následujícím obrázku:

filtr dokumentů podle více barev 2

Tipy: Pokud buňky nejsou vyplněny barvou pozadí, zobrazí záporné číslo -4142.

5. Potom můžete pomocí tohoto nového pomocného sloupce filtrovat více barevných řádků, vybrat tento pomocný sloupec a kliknout Data > Filtr, potom klikněte na tlačítko se šipkou v pravém dolním rohu první buňky, v seznamu vyberte číslo indexu barev, které chcete filtrovat, viz screenshot:

filtr dokumentů podle více barev 3

6. Pak klikněte na tlačítko OK tlačítko a vybrané barvy budou odfiltrovány, viz screenshot:

filtr dokumentů podle více barev 4

7. Nakonec můžete sloupec pomocníka skrýt, jak potřebujete.


Související články:

Jak filtrovat data oddělená čárkami v aplikaci Excel?

Jak filtrovat přesný text v aplikaci Excel?

Nejlepší nástroje pro produktivitu v kanceláři

Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...

karta kte 201905


Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Leider funktioniert das nicht bei bedingter Formatierung, hier wird die -4142 ausgegeben, da die Zelle nicht manuell eingefärbt wurde.

Gibt es dafür eine Lösung?
This comment was minimized by the moderator on the site
This is AMAZING!!
This comment was minimized by the moderator on the site
tnks brother, bt some colorit can't read and showing same figure
This comment was minimized by the moderator on the site
Thanks for the great workaround!!
This comment was minimized by the moderator on the site
This is brilliant! Thank you very much. It's a pity this isn't stock but your solution is a great workaround.
This comment was minimized by the moderator on the site
What changes to the above would be needed to put in the personal workbook so this function can be used with any spreadsheet and not need to be redone every time it was to be used? Thank you for your help! :) Tina
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations