如何把ACCESS中的MEMO字段导入Excel文件中(200分)

我现在做一个程序要把，access数据库中的memo字段导入到 Excel 中， memo字段可以通过DBmemo读出来， 也就是说如何把8个记录的 DBmemo 内容放到一页 Excel中， 每个memo里的内容大概有9行左右， 要放8条记录大概就要 分四行两列放这样一页才够放，
我自己试了一下，第一步就下不去了

v:=CreateOleObject('Excel.Application');

这个语句报错，提示 不理解的 createoleobject
我的机器：

windows XP SP2 + Delphi 7 + office 2003 龙卷风版

现在的大富翁真的不是一般的冷，顶上来

//下面的代码是我手打的，没调试，但基本上就是这么做的了
Uses ComObj;
var
Excel1:variant;
begin
try //如果已有活动的Excel.application对象,取其接口
Excel1:=GetActiveOleObject('Excel.Application');
except //这些个api所使用到的参数，其实都可以在注册表里搜索到.
Excel1:=CreateOleObject('Excel.Application'); //否则自己创建之
//Excel1:=CreateOleObject('Excel.Application.7'); //不同版本也有可能出错，试试吧..........
end;

提示错误，是不是还没加哪个单元呢

Build
[Error] Unit3.pas(379): Undeclared identifier: 'GetActiveOleObject'
[Error] Unit3.pas(381): Undeclared identifier: 'CreateOleObject'
[Fatal Error] Project1.dpr(7): Could not compile used unit 'Unit3.pas'

我的引用单元
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls,strutils, DB, ADODB, DBCtrls, Grids, DBGrids,
OleCtnrs, Excel2000, OleServer, ExcelXP;

ComObj

多人接受答案了。