Excel - Skrij vrstice z ničelno vrednostjo v več listov

Težava

Prosim, pomagajte mi pri izdelavi makra v Excelsheetu, ki:

Lahko skrivam celotne vrstice, če ima vrednost celice ali (obseg vrednosti) ničelno vrednost v več listih ??? Mislim na primer, ko odpiram datoteko ali ko kliknem na dno kontrolnika, da zaženem makro.

Moj primer je:

Imam eno datoteko excel, ki ima 32 listov za vsako osebje, in vsak list ima tabelo s 3 stolpci

 (A, B, C) in 26 vrstic (1-26). Stolpec A za besedilo Stolpec B za besedilo tudi stolpec C za vrednosti

moja zahteva je skriti / razkriti celotno vrstico / s, odvisno od vrednosti v stolpcu C in za vsak list 32 bodisi s pritiskom na ukaz ali s spremembo vrednosti ali karkoli drugega.

Rešitev

Cilj:

Za filtriranje / skrivanje vrstic na celotnem listu za dano vrednost.

Predpostavke:

1. Položaj stolpca je enak na vsakem listu

3. Filter mora biti uporabljen na vseh listih

3. Listi niso skriti

4. Vsi listi imajo vsaj eno polno celico

KORAKI

1. Preberite predpostavke

2. Naredite varnostno kopijo

3. Pritisnite ALT + F11 in vstavite nov modul

4. Prilepite kodo in jo zaženite

KODA:

 Sub HideRows () Dim Sheet kot objekt Dim filter Za varianto Dim iFilterCol As Integer iFilterCol = 3 'uporabite filter na 3 col filterFor = InputBox ("Vnesite vrednost, ki jo želite filtrirati", "Filter out") za vsak list v listih listov Izberi Če ActiveSheet.AutoFilterMode nato Cells.Select Selection.AutoFilter End Če Cells.Select Če ActiveSheet.AutoFilterMode = False potem Selection.AutoFilter End Če Selection.AutoFilter Field: = iFilterCol, Criteria1: = "" & filterFor, Operator: = xlAnd Naslednji konec Sub