>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!

>#Define xlShiftRight -4152

Is it true ?
Try with -4161
Cetin