>>oSheet.Saved = .T. >>>>>
>>>set strictdate to 0 >>>messagebox(alltrim(gethebdate({12/16/1969}))) >>>set strictdate to >>>function gethebdate >>> lparameters djdate >>> local chebdate >>> set strictdate to 0 >>> objexcel= createobject("Excel.Application") >>> oworkbook = objexcel.workbooks.open('c:\c.xls') >>> osheet = oworkbook.activesheet >>> osheet.cells(3,2).value= djdate >>> chebdate=osheet.cells(3,3).value >>> objexcel.quit >>> return chebdate >>>endfunc>>>It's work fine but Excel ask me if to save the change and its very unnecessary service for me.