[?] Добавление 2-х пустых строк через одну

[Beliy.IV]

Необходимо после каждой заполненной строки добавить две новые пустые.
Пример.
Иванов | Иван | Иванович
Петров | Петр | Петрович
Результат
Иванов | Иван | Иванович
______|______|
______|______|
Петров | Петр | Петрович

Таблица всё время разная и большая, от 300 до 500 строк.
Как мне быстро это сделать?

Excel 2003, делать это будется на разных ПК т.е. всё должно быть в одном файле XLS
----------------

[Serge_Bliznykov]

такой макрос устроит?

Sub Макрос1()
Dim i&
 i = Cells(Rows.Count, 1).End(xlUp).Row + 1
 While i > 1
  Rows(i).EntireRow.Insert
  Rows(i).EntireRow.Insert
  i = i - 1
 Wend
End Sub

[Beliy.IV]

Я забыл написать, уровень знания EXCEL школьный.
На дому стоит 2010 версия, добавил режим разработчика, куда далее вставлять?

методом тыка, сработало. СПАСИБКА с меня