Podkladová úloha: Pracujeme již podeváté se stejnou rozsáhlejší tabulkou. Stáhněte si sešit 2012-02 Filtry.xlsm z odkazu na konci článku. Sešit otevřete. Uvidíte zhruba toto:

Od minulého dílu jsou zde dva nové sloupce „Spoluprace_Od“ a „Spoluprace_Do“, jejichž význam je zhruba takový: Kde není vyplněno nic, tak jsme s tímto člověkem dosud nespolupracovali, kde je vyplněno „Od“, ale ne „Do“, tak s ním dosud spolupracujeme, a kde je vyplněno i „Do“, tak jsme spolupráci ukončili.

Dostali jsme naléhavý úkol najít seznam všech měst, kde se vyskytuje nějaký Jan Hlaváček. Pokud by to bylo jednorázové, mohli bychom zcela bez maker s automatickým filtrem vyfiltrovat všechny záznamy, kde je v příjmení Hlaváček a ve jméně Jan, a pak se podívat do nabídky filtru ve sloupci Obec a tam ten seznam je. Pouze bychom ho tvořili ručně třeba za pomoci odškrtávání na papíře. Ve chvíli, kdy podobnou úlohu budeme dostávat pravidelně několikrát denně a s různými příjmeními a městy, bude se nám makro hodit.

Na list Param si uložíme kritéria pro potřebný rozšířený filtr:

Pomocí rozšířeného filtru nejprve vypíšeme dole pod databází výběr sloupců jen pro Příjmení, Jméno a Obec a to s výše uvedenými kritérii. Pak zvolíme rozšířený filtr s parametrem Kopírovat jinam s výše uvedenými kritérii, a navíc budeme požadovat jedinečné výskyty (tj. zaškrtneme pole Bez duplicitních záznamů). Jakmile zjistíme, že to funguje, celé si to nahrajeme, a pak nahraný kód upravíme pro běžné používání:

Vezmeme označené buňky do schránky (Ctrl+C) a dojedeme pod databázi, kam zamýšlíme dočasně vypustit náš seznam a zde CTRL+V vypustíme:

Nyní celou operaci provedeme se zapnutým nahráváním makra:

A vidíme hotový seznam:

Nyní zastavíme nahrávání maker a podíváme se na výsledek:

Ačkoli většinu z nahraného kódu budeme muset vyměnit, bude nám sloužit jako vodítko k vytvoření funkčního programu. Provedení těchto úprav si ponecháme do příštího dílu. Tam rovněž cílový seznam setřídíme abecedně, zkopírujeme na samostatný list a doplníme o další podstatné informace, jako kterého jména a příjmení se týká a k jakému datu byl vytvořen. Potom po sobě musíme uklidit a smazat výstup pod databází.

Domácí úkol: Vysvětlete, proč se k vytvoření seznamu takových vlastností nedá jednoduše použít automatický filtr. A proč jsme museli výstup rozšířeného filtru směřovat jinam? (Nápověda: jak se zbavit duplicit?).

Aktuální verze příkladu ke stažení – 2012-02 Filtry.xlsm

Autor článku: Pavel Balek, info@abspektrum.cz, www.abspektrum.cz