[Ildar-tsr]

Пропишите так:

Код:

WordApplication1.ActiveDocument.Tables.Add(WordApplication1.Selection.Range,
         20,5,0,1);