#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