how do I insert multiple rows in excel after every row of data

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I need to insert 23 rows after every row that is currently in my spreadsheet
 
For i = Cells(Rows.Count,"A").End(xlUp).Row To 1 Step -1
Cells(i+1,"A").Resize(23,1).Entirerow.Insert
Next

--

HTH

RP
(remove nothere from the email address if mailing direct)


grantm5 said:
I need to insert 23 rows after every row that is currently in my
Click to expand...
spreadsheet
 
You must log in or register to reply here.

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

How do I insert a row after every row of data in XL? 5
Macro to insert a row after every 4th row 2
Inserting blank rows in Excell 6
INSERTING NEW ROWS 3
insert 3 blank rows after every 2 rows 1
Inserting rows 1
How can I insert rows BELOW, in Excel 1
How to filter rows data based on background color of individual cells 1

Back
Top