Как вставить в лист EXCEL каждую вторую пустую строку

Материал из Фабиус wiki

Версия от 09:42, 27 июля 2017; Hisava (обсуждение | вклад)

(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)

Перейти к: навигация, поиск

Необходимо написать макрос

  For i = 1 To 1000 Step 2
    Rows(i).Select
    Selection.Insert Shift:=xlDown
  Next

Смотрите также

Источник — «https://wiki.sftserv.ru/index.php?title=Как_вставить_в_лист_EXCEL_каждую_вторую_пустую_строку&oldid=24607»