With the help of others I have a marco that inserts cells into my worksheet.
I would also like to make a marco to remove these cells, so basically if you
would use the insert marco and then use the delete marco your worksheet would
be like it was untouched.

This is the marco used for inserting:

Sub InsertSemester()
Dim LastRow As Long
LastRow = Cells(Rows.Count, "A").End(xlUp).Row
v = Rows(LastRow - 1).Formula
Cells(LastRow - 1, "A").Resize(5, 1).EntireRow.Insert
Rows(LastRow - 1) = v
Rows(LastRow + 4).ClearContents
Range("AU2:BG6").Copy Cells(LastRow, "A")
End Sub

Hope You Can Help