Thanks for the replay but...
That did not work...
I tried ooObject=CREATEOBJECT("Excel.Application")
But I get:

OLE Error code 0x800020006: Unknown Name.

Anymore suggestions...Here is the code:
ctext=getfile('XLS',cdisplay,'OK',1)
oObject=createobject("Excel.Application")
oObject.AppMinimize
oObject.FileNew
oObject.FileSaveAs(ctext)

thanks