关于启动Excel的菜单和MDI窗口菜单合并为一个菜单的问题?(200分)

各位高手好!
我建立了一MDI窗口并有一菜单,其中一个菜单项的功能是启动Excel启动程序如下:
Var
Ex,Wb,Sh :variant ;
Begin
Ex :=createoleobject('Excel.Application');
Ex.workbooks.add;
Ex.visible =True;
Wb:=Ex.ActiveWorkbook;
Sh:=Wb.activesheet;
End ;
在上面的程序中启动Excel,但是启动的Excel的窗口不在我的MDI之中,我想要Excel菜单和我的MDI菜单和为一个菜单
并且Excel窗口应在MDI的父窗口之中.
在上述方法我无法实现的情况下我又采用另一方法随然解决了菜单合并问题却不知如何给单元格赋值
我想用如下方法:
在new appliction中在一窗口中加一ole控件ole_test插入Excel表格,并在窗口中加一菜单
菜单的功能是给单元格填值程序如下:
var
Ex :variant;
Begin
Ex:=ole_test.oleobject;
往下的程序我就不知道如何去写给单元格赋值
End;
有那位高手给解决.

2.
var
Ex :variant;
sh:variant;
Begin
Ex:=ole_test.oleobject;
sh:=Ex.activesheet;
sh.cells[1,1]:=1;
End;

arm老师:
您能否对第一种方式给以解决?

请继续或结束

请继续或结束

并且Excel窗口应在MDI的父窗口之中.
还没有见过实现的。