Ako vypnúť každý druhý riadok pomocou makra
Chcete, aby bol každý druhý alebo každý n -tý riadok v tabuľke neviditeľný? Môžete to urobiť pomocou príkazu „Skryť“. Ale ak to chcete urobiť pre veľký počet riadkov, začne to byť únavné.
Makro robí prácu za vás. Tu je kód:
Podsekcia druhého riadka skryť ()
Dim Row ako dlhý
Riadok = 1
Kým riadok <1000
Bunky (riadok, 1). EntireRow.Hidden = True
Riadok = riadok + 2
Wend
Koniec pod
Makro skryje každý ďalší riadok vo vašom aktívnom pracovnom hárku od riadka 1 do riadku 1000. Ak chcete iný rozsah, zadajte do príkazu dolnú hranicu 1 Riadok = 1 a v príkaze zmeňte hornú hranicu 1 000 Kým riadok <1000. Jednoducho nahraďte čísla 1 a 1000 číslami, ktoré si vyberiete.
Ak nechcete skrývať každý druhý riadok, môžete do príkazu pridať aj inú hodnotu pre 2 Riadok = riadok + 2 vstúpiť. Hodnota 4 skryje iba každý štvrtý riadok, číslo 10 každý desiaty riadok atď.
Ak chcete znova zobraziť skryté riadky, nahraďte príkaz Pravda v makre Falošné a spustite makro znova.