Hoe elke andere regel uit te schakelen met een macro
Wil je elke tweede of elke nde rij in een tabel onzichtbaar maken? U kunt dit doen met het commando "Verbergen". Maar als je dit voor een groot aantal regels wilt doen, wordt het vervelend.
Een macro doet het werk voor je. Hier is de code:
Sub tweede regel verberg ()
Dim rij zo lang
Rij = 1
Terwijl lijn <1000
Cellen (regel, 1) .EntireRow.Hidden = True
Lijn = lijn + 2
Wend
Einde sub
De macro verbergt elke andere rij in uw actieve werkblad van rij 1 tot rij 1000. Als u een ander bereik wilt, past u de ondergrens 1 in het commando Rij = 1 en verander de bovengrens 1000 in de opdracht Terwijl lijn <1000. Vervang eenvoudig de 1 en 1000 door de nummers van uw keuze.
Als u niet elke tweede regel wilt verbergen, kunt u ook een andere waarde voor 2 toevoegen aan de opdracht Lijn = lijn + 2 binnenkomen. Een waarde van 4 verbergt alleen elke vierde regel, een getal van 10 elke tiende regel, enzovoort.
Om de verborgen regels weer te tonen, vervangt u het commando Waar in de macro niet waar en start de macro opnieuw.
