That was excellent and worked as advertised, but when I try to apply the same technique on another spreadsheet, I get the error: "Unable to get the Insert property of the Range class"

The working excel macro is:

    Range("B3:C31").Select
    Selection.Copy
    Selection.Insert Shift:=xlToRight

And my attempted VFP code to do the same thing is:

oExcel.WorkBooks.Open(THISFORM.cdatapath+[YugiohTemplate.xls])
oRecapSheet = oExcel.Activesheet
#Define xlShiftRight -4152
WITH oRecapSheet
    FOR i = 3 TO nColumnCount STEP 2
	.Range("B3:C31").Copy
	.Range("B3:C31").Insert(xlShiftRight)
    NEXT
ENDWITH

Can you tell me what I'm missing?

Much thanks in advance!