Сакриј сваку другу линију

Anonim

Како искључити сваку другу линију помоћу макроа

Да ли желите да сваки други или сваки н -ти ред у табели буде невидљив? То можете учинити помоћу команде "Сакриј". Али ако желите ово да урадите за велики број редова, постаје досадно.

Макро ради уместо вас. Ево кода:

Сакриј подреду ()
Дим Ров Ас Лонг
Ред = 1
Док је ред <1000
Ћелије (линија, 1) .ЕнтиреРов.Хидден = Тачно
Линија = линија + 2
Венд
Енд Суб

Макро скрива сваки други ред на вашем активном радном листу од реда 1 до реда 1000. Ако желите другачији опсег, поставите доњу границу 1 у команду Ред = 1 и промените горњу границу 1000 у команди Док је ред <1000. Једноставно замените 1 и 1000 бројевима по вашем избору.

Ако не желите да сакријете сваки други ред, наредби можете додати и другу вредност за 2 Линија = линија + 2 ентер. Вредност 4 скрива само сваки четврти ред, број 10 сваки десети ред итд.

Да бисте поново приказали скривене линије, замените команду Истина у макро Нетачно и поново покрените макро.