应该这样，给你个例子：
...
var
Word, Doc, Table: OleVariant;
begin
{ 创建Word对象并运行Word }
Word := CreateOleObject('word.application');
Word.Visible := true; { 使Word可见 }
Doc := Word.ActiveDocument; { 取Word中当前的活动文档 }
Table := Doc.Tables.Item(1); { 取Doc中的第一个表格 }
{ 在Table的第1行第1列填入文字'Hello' }
Table.Cell(1, 1).Range.Text := 'Hello';
...
具体见Word VBA的帮助，它存放在下面的目录下：
C:/Program Files/Microsoft Office/Office/VBAWRD8.HLP
