Ako skryť riadky prostredníctvom VBA, ak má bunka určitý obsah
Chcete pomocou makra automaticky skryť všetky riadky s určitým obsahom? Predstavte si, že chcete skryť všetky riadky, ak sa text „skryť“ zobrazí v ľubovoľnej bunke v zodpovedajúcom riadku. Môže to byť užitočná aplikácia na čistenie údajov. Pozrite sa na počiatočnú situáciu v nasledujúcej tabuľke:
V tejto tabuľke chceme skryť všetky riadky, ktoré obsahujú bunky obsahujúce nulu. Použite nasledujúce makro:
Skryť konkrétne riadky ()
Dim Cell as Range
Pre každú bunku v ActiveSheet.UsedRange
If Cell.Value = 0 And Rows (Cell.Row) .Hidden = False _
Potom Riadky (cell.Row). Skryté = True
Ďalšia bunka
Koniec pod
Ak spustíte makro s, niektoré riadky budú úplne skryté, ako ukazuje nasledujúci obrázok
V každom z týchto riadkov sa v niektorom stĺpci zobrazí text „skryť“. Ak chcete namiesto tohto obsahu skontrolovať iné kritérium, upravte zodpovedajúce porovnanie v makre.
Ak chcete znova zobraziť všetky bunky, stlačte kombináciu klávesov CTRL A a potom vyberte funkciu ŠTART - FORMÁT - VYMAZANIE A ZATIAHNUTIE - UKÁZAŤ LINKY (Excel 2007 a Excel 2010) alebo FORMÁTOVAŤ ČAS - FADE V (Excel do verzie 2003). Na postupné stmavenie môžete použiť aj nasledujúce makro:
Zobraziť všetky sub
Cells.Rows.Hidden = False
Koniec pod
Ak chcete zadať jedno z makier, v programe Excel stlačte kombináciu klávesov ALT F11. Tým sa vyvolá editor VBA. Na vloženie prázdneho listu modulu použite príkaz VLOŽIŤ - MODUL. Ak chcete spustiť jedno z makier, stlačte v programe Excel kombináciu klávesov ALT F8.
