I'm trying to cut a range then insert the cut range at a particular location.
The code looks like this:

Range("F5:G" & ActiveSheet.UsedRange.Rows.Count).Cut
Range("D5").Insert(xlShiftToRight)

However, when it reaches this point, I get an error saying "Cut method of
Range class failed". I've tried changing the destination range so that it
reads similar to the origin range, but that didn't help. Can someone help me
get the syntax on this line correct? I've got several similar lines further
down in the code. If I can fix this line, I'll be able to fix them all.

Thanks.