#DEFINE xlWorkbookNormal -4143 LOCAL oExcel AS Excel.Application lcXlsFile = FULLPATH("Test.xls") COPY TO (lcXlsFile) XL5 oExcel = CreateObject("Excel.Application") oExcel.DisplayAlerts = .F. *oExcel.Visible = .T. oWorkbook = oExcel.Workbooks.Open(lcXlsFile) oWorkbook.SaveAs(lcXlsFile, xlWorkbookNormal) oExcel.Quit