Glad you got the problem solved, but perhaps a cleaner way of doing this would be

oExcel = CREATEOBJECT([Excel.Application])
oExcel.Visible = .t. 	
oWorkbook = oExcel.Workbooks.Add()	
oWorkbook.SaveAs(cxlsfile, xlNormal) 
oWorkbook.open(cxlsfile) 

Though I'm not sure you need that last .open command, but I haven't tested it, but doesn't the SaveAs leave the file open?


>Hi,
>
>The problem solve, I change the code to use oExcel.ActiveWorkbook.SaveAs
>instead of oExcel.Workbook.SaveAs
>
>

>oExcel = CREATEOBJECT([Excel.Application])
>oExcel.Visible = .t. 	
>oWorkbook = oExcel.Workbooks.Add()	
>oWorkbook = oExcel.ActiveWorkbook.SaveAs(cxlsfile, xlNormal) 
>oWorkbook = oExcel.Workbooks.open(cxlsfile) 
>

>
>Thanks.
>Derek