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

Материал из Фабиус wiki
Перейти к: навигация, поиск
м
м
 
Строка 1: Строка 1:
 
Необходимо написать макрос
 
Необходимо написать макрос
 
 
   For i = 1 To 1000 Step 2
 
   For i = 1 To 1000 Step 2
 
     Rows(i).Select
 
     Rows(i).Select
 
     Selection.Insert Shift:=xlDown
 
     Selection.Insert Shift:=xlDown
 
   Next
 
   Next
 
 
= Смотрите также =
 
= Смотрите также =
 
[[EXCEL]]
 
[[EXCEL]]

Текущая версия на 09:42, 27 июля 2017

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

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

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

EXCEL