I am currently using the following code to copy 11 rows in my spreadsheet and paste them at the bottem. Each group of 11 rows represents a student and everytime i insert a new bunch this represents a new student.
- Code: Select all
Sub InsertRows(): Dim R As Range
Set R = Rows.Find("*", , , , xlByRows, xlPrevious)
With ActiveSheet
.Rows("10:14").Copy
R.Offset(1, 0).EntireRow.Insert
End With
End Sub
I was wondering if i could adapt this so that it moves all formulas row number down by 5 each time i do the insert?
I hope this makes sense i am not very good with the Excel terminology!
I look forward to peoples answers.
Thanks
James