>xl = createobject("excel.application") >xl.workbooks.open(filfrom) >fd = substr(DT,7,2) + substr(DT,1,2) + substr(DT,4,2) + CAMT + ".XLS" >filto = pth + fd >xl.sheets(1).select >xl.cells(1,6).value = "AMOUNT" >xl.ActiveWorkbook.SaveAs(filto) >xl.ActiveWorkbook.Saved = .T. >xl.ActiveWorkBook.Close() >xl.Quit >>I thought there was a way to be able to do this without having msExcel installed, that microsoft provided the objects for free as a special package.