Александр Жирноff Голосов: 1 Адрес блога: http://www.zhirnoff.ru Добавлен: 2009-05-10 13:18:26 блограйдером soultes

Макрос удаления нечетных строк в Экселе

2010-08-05 13:56:17 (читать в оригинале)

Недавно понадобилось удалить все нечетные строки в Excel. Быстренько был сделан следующий микро макрос: i = 1 While Not Cells(i, 1) = “” Rows(i).Delete i = i + 1 Wend Для удаления четных в начале для i достаточно задать начальное значение равное 2. В итоге несколько тысяч строк были удалены за несколько секунд. Теги: excel, [...]