Kako skriti vrstice prek VBA, če ima celica določeno vsebino
Ali želite samodejno skriti vse vrstice z določeno vsebino z uporabo makra? Predstavljajte si, da želite skriti vse vrstice, če se besedilo "skrij" pojavi v kateri koli celici v ustrezni vrstici. To je lahko uporabna aplikacija za čiščenje podatkov. V naslednji tabeli si oglejte začetno stanje:
V tej tabeli želimo skriti vse vrstice, ki vsebujejo celice, ki vsebujejo ničlo. Uporabite naslednji makro:
Skrij določene vrstice ()
Dim Cell As Range
Za vsako celico v ActiveSheet.UsedRange
Če je Cell.Value = 0 In Rows (Cell.Row) .Hidden = False _
Nato vrstice (celica. Vrstica). Skrito = res
Naslednja celica
End Sub
Če zaženete makro z, bodo nekatere vrstice popolnoma skrite, kot je prikazano na naslednji sliki
V vsaki od teh vrstic se v nekem stolpcu prikaže besedilo "skrij". Če želite namesto te vsebine preveriti drugo merilo, prilagodite ustrezno primerjavo v makru.
Če želite znova prikazati vse celice, pritisnite kombinacijo tipk CTRL A in nato izberite funkcijo ZAGON - OBLIKOVANJE - IZBIRANJE IN FADE V - PRIKAZ LINIJE (Excel 2007 in Excel 2010) ali OBLIKOVANJE LINE - FADE IN (Excel do različice 2003). Druga možnost je, da z naslednjim makrom zbledite:
Pokaži Sub All
Cells.Rows.Hidden = False
End Sub
Če želite vnesti enega od makrov, pritisnite kombinacijo tipk ALT F11 v Excelu. To prikliče urejevalnik VBA. Z ukazom INSERT - MODULE vstavite prazen list modula. Če želite zagnati enega od makrov, pritisnite kombinacijo tipk ALT F8 v Excelu.