OLE 访问Excel出错？请问了

OLE 访问Excel出错？？请教了
var
  ExcelApp,Sheet: Variant;
begin
 ExcelApp:=CreateOleObject('Excel.Application');
 ExcelApp.Workbooks.open(fEdit.Text);
 ExcelApp.Worksheets[1].Activate;
 Sheet:=ExcelApp.Worksheets[1];

 Form1.Caption:= ExcelApp.Worksheets[1].Cells[0,0];

 ExcelApp.ActiveWorkBook.Saved := True;
 ExcelApp.WorkBooks.Close;
 ExcelApp.Quit;

以上执行，提示错误 OLE error 800A03EC

哪里错了呢？

[解决办法]

Delphi(Pascal) code

 Form1.Caption:= ExcelApp.Worksheets[1].Cells[1,1];