Stejně jako většina ostatních rozevíracích nabídek, i ty v Excelu obsahují klikatelné šipky. Při exportu nebo sdílení souborů aplikace Excel však možná budete chtít skrýt nebo odstranit šipky.
Jak tedy odstraníte nežádoucí šípy? Existují dva způsoby, jak to udělat – jeden je docela snadný a využívá základní nástroje Excelu a druhý vyžaduje, abyste na soubor, na kterém pracujete, použili konkrétní kód. Ať tak či onak, následující průvodce by vám měl pomoci, abyste to zvládli, aniž byste se zapotili.
Nastavení kontingenční tabulky
Toto je rychlá a snadná metoda, ale měli byste vědět, že akce také skryje názvy polí. Pokud vám to nevadí, podívejte se na níže uvedené kroky. V opačném případě přejděte přímo na pokročilejší metodu kódování/makra.
Krok 1
Vyberte první buňku pod názvem pole a klikněte na ni pravým tlačítkem. Klikněte na Možnosti kontingenční tabulky v místní nabídce, měli byste ji najít ve spodní části seznamu.
Krok 2
Jakmile se zobrazí okno Možnosti kontingenční tabulky, měli byste vybrat kartu Zobrazení. Hledáte „Popisky zobrazovaných polí a rozevírací nabídky filtrů“. Tato funkce je ve výchozím nastavení zaškrtnutá a musíte ji zrušit, aby šipky zmizely.
Když zrušíte zaškrtnutí funkce, klikněte na OK v dolní části okna, aby se změny projevily. Zobrazte náhled tabulky a zjistěte, zda vše vypadá v pořádku bez názvů polí.
Metoda maker
Výhody této metody spočívají v tom, že názvy polí zůstanou nedotčené a můžete se rozhodnout odstranit všechny šipky rozevíracího seznamu nebo pouze jednu z nich. Na první pohled může tato metoda vypadat složitě, ale většinou se scvrkává na pečlivé kopírování a vkládání.
Odstranění všech šipek
Krok 1
Nejprve se podívejte na část kódu, kterou potřebujete implementovat, abyste se zbavili všech šipek v souboru.
Sub DisableSelection ()
‘odstranit výukový program s rozevírací šipkou od techjunkie.com
Dim pt As PivotTable
Dim pt As PivotField
Nastavit bod = ActiveSheet.PivotTables (1)
Pro každý pf V pt.PivotFields
pf.EnableItemSelection = False
Další pf
End Sub
Tento kód prochází všemi poli a buňkami a deaktivuje funkci výběru položky. Jinými slovy, deaktivuje všechny šipky v kontingenční tabulce.
Krok 2
Zkopírujte celý kód/makro – použijte Cmd+C na Macu nebo Ctrl+C na Windows počítači. Pamatujte, že kód by měl být zkopírován tak, jak je, protože i drobný překlep může ovlivnit jeho funkčnost.
Nyní musíte kliknout na kartu Vývojář pod panelem nástrojů Excel a vybrat nabídku Visual Basic. Měla by to být první možnost v nabídce vývojáře.
Poznámka: Některé verze Excelu nemusí obsahovat kartu Vývojář. Pokud se setkáte s tímto problémem, použijte klávesovou zkratku Alt+F11, abyste se dostali přímo do nabídky jazyka Visual Basic.
Krok 3
Vyberte sešit/projekt, na kterém pracujete, z nabídky v levém horním rohu okna Visual Basic. Klikněte na Vložit na panelu nástrojů a vyberte Modul.
Modul by se měl objevit ve velkém menu napravo a kurzor by měl být právě tam, kam potřebujete vložit kód. Když vložíte kód, řádek komentáře (ten, který začíná apostrofem) zezelená a ostatní řádky jsou černé a modré.
Krok 4
Vraťte se do listu aplikace Excel a vyberte libovolnou buňku. Vyberte kartu Zobrazit, klikněte na nabídku Makra zcela vpravo a poté vyberte makro/kód, který jste právě vložili.
Měl by být první v nabídce. Vyberte jej, klikněte na Spustit a všechny šipky z tabulky zmizí.
Odstranění jedné šipky
Opět se jedná o kód, který můžete použít k odstranění pouze jedné z rozevíracích šipek.
Sub DisableSelectionSelPF ()
‘odstranit výukový program s rozevírací šipkou od techjunkie.com
Dim pt As PivotTable
Dim pf As PivotField
Při chybě pokračovat dále
Nastavit bod = ActiveSheet.PivotTables (1)
Nastavit pf = pt.PageFields (1)
pf.EnableItemSelection = False
End Sub
Od této chvíle byste měli postupovat podle kroků 2 až 4 z předchozí části.
Poznámka: Pro účely tohoto článku je makro naprogramováno tak, aby se zbavilo první šipky, na kterou narazí. Kód se může trochu lišit, pokud chcete odstranit jinou šipku.
Věc ke zvážení
Metody byly vyzkoušeny a testovány na malém listu, který obsahuje 14 řádků a 5 sloupců. Přesto by měly fungovat i na mnohem větších listech.
Stojí za zmínku, že kroky platí pro verze aplikace Excel od roku 2013 do roku 2016. Makra by se měla vztahovat i na novější iterace softwaru, ale rozložení nástroje může být trochu jiné.
Při použití maker můžete vrátit změny změnou hodnoty z = nepravda na = Pravda. Vložte několik prázdných řádků do modulu, vložte celý kód a pouze změňte pf.EnableItemSelection čára.
Vystřelte Neviditelný šíp
Používání maker je často považováno za středně pokročilé nebo dokonce pokročilé znalosti Excelu. Ve skutečnosti není makra tak těžké zvládnout a mohou vám pomoci rychle se zbavit šipek a udělat mnoho dalších skvělých věcí.
Proč byste chtěli odstranit šipky z listu? Už jste dříve používali makra? Podělte se o své zkušenosti se zbytkem komunity TechJunkie.