insert 3 blank rows after every 2 rows

M

Mike H

Hi,

Right click your sheet tab, view code and paste this in. Change the 9 to
the row wher you want insertion to start.

Sub InsertRows()
For i = 9 To 2 Step -2
Rows(i & ":" & i + 2).Insert Shift:=xlDown
Next
End Sub


Mike
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Inserting blank rows in Excell 6
Insert blank rows 2
How do I insert a row after every row of data in XL? 5
Inserting blank rows 3
Force a filter beyond blank rows 1
Paste with multiple selection 3
Insert Multiple Blank Rows 3
How can I insert a blank row after every four rows in Excel? 2

Top