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
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
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
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
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.