>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