>>IF '12' $ loExcel.VERSION && XL 2007 >> * Kevin Delaney's suggestion >> loExcel.SAVEAS(tcXLSFileName, 39) && 39 >> * Cetin Basoz suggestion >> loExcel.ActiveWorkbook.Saved = .T. >> loExcel.ActiveWorkbook.CLOSE(0) >> ELSE >> loExcel.SAVE() >> ENDIF>>
>LOCAL loExcel AS Excel.Application >loExcel = CREATEOBJECT([Excel.Application]) >loExcel.WorkBooks.Add() >tcXLSFileName = [c:\test.xlsx] >IF '12' $ loExcel.VERSION && XL 2007 > * Kevin Delaney's suggestion > loExcel.ActiveWorkbook.SAVEAS(tcXLSFileName, 39) && 39 > * Cetin Basoz suggestion > loExcel.ActiveWorkbook.Saved = .T. > loExcel.ActiveWorkbook.CLOSE(0) >ELSE > loExcel.SAVE() >ENDIF >Seems to work now.