Piloter Excel par OLE

uses ComObj;

procedure TForm1.Button1Click(Sender: TObject);
var
excel:Variant;

begin
try
excel:=CreateOleObject('Excel.Application');
except
ShowMessage('Excel konnte nicht gestartet werden.');
exit;
end;
excel.Visible:=true;
excel.Workbooks.Add; excel.Cells[1,1].Value:='SwissDelphiCenter.ch';
excel.Cells[2,1].Value:='http://www.swissdelphicenter.ch';
end;