With your code when you select Rows 10:13
that would change the current selection to rows 10 thru 13.
This example sets a variable 'curRow' to use as the current
selected row and does not select rows in the copy process.
The Insert command is to be applied to row of the current
selected cell or range.
curRow = Selection.Row
CutCopyMode = False