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

Материал из Фабиус wiki
Версия от 11:16, 26 февраля 2016; Hisava (обсуждение | вклад) (Новая страница: «Необходимо написать макрос For i = 1 To 100 Step 2 Rows(i).Select Selection.Insert Shift:=xlDown Next»)

(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)
Перейти к: навигация, поиск

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

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