oSheetToCopy = oXls.Worksheets("Page 01") oSheetToCopy.copy(, oXls.Worksheets(x))This should work (where x refers to the worksheet after which you want to copy "Page 01").
>>oXls=CREATEOBJECT("excel.application") >>oXLS.Application.Workbooks.Add() >> >>oXls.visible=.t. >>oSheetToCopy = oXls.Worksheets("sheet1") && object reference to the sheet we want to copy >>oSheetToCopy.Range("A1").value = "Test" && add some text >> >>lnWorksheets = oXls.Worksheets.count && get total number of worksheets >> >>FOR i = 1 TO 10 >> oSheetToCopy.copy(,oXls.Worksheets(lnWorksheets)) && copy after last worksheet >> lnWorksheets = lnWorksheets + 1 && increase counter >> oXls.Worksheets(lnWorksheets).name = "sheet"+ALLTRIM(STR(lnWorksheets)) && rename added worksheet >>ENDFOR &&* i = 1 TO 10>>