Как вставить в лист EXCEL каждую вторую пустую строку — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
м
м
Строка 5: Строка 5:
 
     Selection.Insert Shift:=xlDown
 
     Selection.Insert Shift:=xlDown
 
   Next
 
   Next
 +
 +
= Смотрите также =
 +
[[EXCEL]]

Версия 09:32, 1 февраля 2017

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

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

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

EXCEL