> > LOCAL oexcel as Excel.Application
> > oExcel = createOBJECT("Excel.application")
> > oExcel.Workbooks.Add()
> > oexcel.Visible = .T.
> > oexcel.Cells(1,1).Value = "test"
> > oexcel.ActiveWorkbook.SaveAs("test.xls")
LOCAL oexcel1 as Excel.Application, oexcel2 as Excel.Application
oExcel1 = createOBJECT("Excel.application")
oExcel2 = createOBJECT("Excel.application")
*:existing File with the sheet you want to pass to another workbook
*:The new xls file where you want to put all your sheets together
oexcel1.Visible = .T.
oexcel2.Visible = .T.
*:Here you will have to go in a For ... Endfor depending
*:on the number of sheets (or xls files containing one single sheet)
*:you need to put together
*:Selecting the sheet to put it on the clipboard
*:Puting the cursor on the other workbook
*:Making sure that is in the first sheet
*:here you have to control if it is the sheet # 1, or # 2
*:locating the cursor in the first cell
*:Pasting the content of the clipboard