copy and paste 2900 times macro

D

DLB

I have 11 rows of data that I want to copy and then paste 2900 times in the
same spreadsheet. Is there a macro that will perform this function?
 
J

Jacob Skaria

Try the below macro. Will copy the 1st 11 rows down///2900 times

Sub mac()
With ActiveWorkbook
Rows("1:11").Select
Selection.Copy
For intLoop = 1 To 2900
Range("A" & (intLoop * 11) + 1).Select
ActiveSheet.Paste
Next
End With
End Sub

If this post helps click Yes
 
D

DLB

Worked great...thanks for the help.

Jacob Skaria said:
Try the below macro. Will copy the 1st 11 rows down///2900 times

Sub mac()
With ActiveWorkbook
Rows("1:11").Select
Selection.Copy
For intLoop = 1 To 2900
Range("A" & (intLoop * 11) + 1).Select
ActiveSheet.Paste
Next
End With
End Sub

If this post helps click Yes
 

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

Top