Excel VBA skrýt sloupce
Skrývání a odkrývání sloupců v Excelu je nejjednodušší úkol. A automatizace tohoto procesu je dokonce snadné. Skrýt sloupec VBA nepotřebuje k zápisu obrovský kód. Než se však pustíme do psaní kódu pro skrytí sloupce ve VBA, musíme pochopit několik věcí a požadavků. Potřebujeme znát název sloupce nebo posloupnost, kterou chceme skrýt, a rozsah buňky, což je volitelná věc.
Jak skrýt sloupce v aplikaci Excel VBA?
Naučíme se, jak skrýt sloupec ve VBA s několika příklady v Excelu.
Tuto šablonu VBA Hide Columns Excel si můžete stáhnout zde - VBA Hide Columns Excel TemplateExcel VBA Skrýt sloupec - Příklad č. 1
K tomu potřebujeme data ve formě více vyplněných sloupců. Zde máme sadu dat, kde jsme náhodně zaznamenali čísla začínající od 1 do 40 v různých 4 sloupcích A, B, C a D a všechny sloupce jsou zabarveny v různých barvách, abychom měli na webové stránce lepší vizuální vzhled.
Předpokládejme, že pokud chceme skrýt sloupce A a B, musíme nejprve vybrat oba sloupce, jak je ukázáno níže.
Nyní klikněte pravým tlačítkem a vyberte možnost Skrýt, jak je uvedeno níže.
Vybrané sloupce se poté skryjí. Viděli jsme pouze sloupec C a D s daty.
Nyní, pokud lze podobnou práci provést i pomocí makra VBA. K tomu bychom potřebovali modul. Takže přejděte na VBA a vyberte modul ze seznamu Vložit, jak je uvedeno níže.
Do nově otevřeného modulu napište podkategorii Skrýt sloupec VBA nebo si můžeme zvolit libovolný jiný název podle našeho výběru, jak je uvedeno níže.
Kód:
Sub Hide_Column () End Sub
Nejprve vyberte sloupec / sloupce, které musíme skrýt. Zde skrýváme sloupec C.
Kód:
Sub Hide_Column () Range ("C: C") End Sub
Protože chceme skrýt celý sloupec C, vyberte funkci EntireColumn následovanou skrytím, jak je ukázáno níže.
Kód:
Rozsah Sub Hide_Column () ("C: C"). EntireColumn.Hidden End Sub
Nyní, aby se to stalo, můžeme si vybrat odpověď PRAVDA nebo NEPRAVDA. Pokud zvolíme Skrytý jako PRAVDA, bude to jako skrytá funkce nebo pokud zvolíme FALSE, bude to fungovat jako skrytá funkce. Protože chceme skrýt vybrané sloupce C z rozsahu, vybrali bychom zde PRAVDA.
Kód:
Rozsah Sub Hide_Column () ("C: C"). EntireColumn.Hidden = True End Sub
Nyní zkompilujte kód a spusťte jej kliknutím na tlačítko Přehrát umístěné pod panelem nabídek ve VBA. Uvidíme, sloupec C je nyní skrytý, nyní zobrazuje pouze sloupce A, B a D.
Pokud chceme skrýt více než jeden sloupec dohromady. Poté v rozsahu musíme vybrat tyto sloupce, jak je znázorněno níže. Zde vybíráme sloupce B a C.
Kód:
Rozsah Sub Hide_Column () ("B: C"). EntireColumn.Hidden = True End Sub
Nyní znovu spusťte kód.
Zde vidíme, sloupce B a C jsou nyní skryté. A jsou viditelné pouze sloupce A a D.
Excel VBA Skrýt sloupec - Příklad # 2
Místo výběru sloupců uvedením jména můžeme skrýt libovolný sloupec také podle jejich posloupnosti. Tento proces mnohokrát není upřednostňován, protože můžeme snadno poznat název sloupce, ve kterém je abecední umístění sloupce umístěno. Tento proces je podobný kódu, který jsme viděli v příkladu # 1, kde jsme vybrali název sloupce jako B a B: C, vybereme pořadové číslo, ve kterém je sloupec umístěn. Pokud předpokládáme, že chceme skrýt sloupec A pomocí kódu z příkladu-1, musíme místo výběru s pomocí Range umístit pořadové číslo.
Kód:
Sub Hide_Column2 () Sloupce (1) .EntireColumn.Hidden = True End Sub
Nyní spusťte tento kód stisknutím klávesy F5 nebo kliknutím na tlačítko Přehrát. Uvidíme, sloupec A, který je na první pozici, je nyní skrytý.
Excel VBA Skrýt sloupec - Příklad # 3
Existuje další způsob, jak skrýt sloupec pomocí kódu VBA. Je to stejně snadné jako kód, který jsme viděli v příkladu č. 1. K tomu opět použijeme stejná data, jaká jsme použili ve výše uvedeném příkladu. Napište podkategorii do libovolného jména nebo do názvu prováděné funkce.
Kód:
Sub Hide_Column3 () End Sub
Vyberte libovolný rozsah sloupce, který musíme skrýt. Zde vybereme stejný sloupec C.
Kód:
Sub Hide_Column3 () Range ("C: C") End Sub
Chcete-li aktivovat výběr požadovaného sloupce, vyberte funkci Sloupce, jak je uvedeno níže.
Kód:
Rozsah Sub Hide_Column3 () ("C: C"). Sloupce End Sub
Potom pomocí skrytého příkazu aktivujte funkci skrytí a skrytí ve VBA.
Kód:
Rozsah Sub Hide_Column3 () ("C: C"). Sloupce. Skrytý konec Sub
A vyberte PRAVDA pro skrytí vybraného sloupce a FALSE pro skrytí vybraného skrytého sloupce.
Kód:
Rozsah Sub Hide_Column3 () ("C: C"). Columns.Hidden = True End Sub
Sloupec C, který byl naším sloupcem rozsahu, je nyní skrytý.
Excel VBA Skrýt sloupec - Příklad č. 4
Existuje další nejjednodušší způsob, jak automatizovat proces skrývání sloupců ve VBA. Za tímto účelem znovu zadejte podkategorii do názvu Skrýt sloupce VBA.
Kód:
Sub Hide_Column4 () End Sub
Přímo vyberte sloupec, který musíme skrýt. Zde opět vybíráme stejný sloupec C.
Kód:
Sub Hide_Column4 () Sloupce ("C") End Sub
A vyberte Skrytý příkaz jako PRAVDA pro aktivaci procesu skrývání. Nebo vyberte FALSE pro aktivaci procesu skrytí.
Kód:
Sub Hide_Column4 () Sloupce ("C"). Hidden = True End Sub
Uvidíme, sloupec C je opět skrytý.
Výhody a nevýhody Excel VBA Skrýt sloupec
- Proces skrýt sloupec VBA je velmi snadné implementovat.
- Můžeme skrýt jakýkoli typ sloupce Range, ať už je v sekvenci nebo v náhodných pozicích.
- Protože je proces VBA Hide Column snadno použitelný, ale ručně, je to stejně snadné jako dělat pomocí kódu VBA. To tedy nijak nepřispívá k úsporám. Důrazně doporučujeme pouze v případě, že pracujeme na psaní obrovského kódu.
Co si pamatovat
- Skrýt a skrýt sloupec pomocí nějakého kódu VBA. Pro odkrývání použijte FALSE namísto TRUE pro funkční účel.
- Pořadové číslo sloupce funguje také pro skrytí sloupce kromě výběru názvu sloupce, který je uveden abecedně.
Doporučené články
Toto je průvodce skrýváním sloupců VBA. Zde diskutujeme o tom, jak skrýt sloupce v Excelu pomocí kódu VBA spolu s praktickými příklady a šablonou Excel ke stažení. Můžete si také prohlédnout naše další doporučené články -
- Pracovní listy v Excelu VBA
- Seskupení sloupců v Excelu (příklady)
- Jak vytvořit UserForm v Excelu VBA?
- Jak přesunout sloupce v Excelu?