//Создаём объект для работы с Word
Word = Новый COMОбъект("Word.Application");
//Создаём новый документ
Doc = Word.Documents.Add();
//Определяем место вставки
Range = Doc.Range(0);
//Создаём таблицу 2х2
Table = Doc.Tables.Add(Range, 2, 2);
Table.Style = "Сетка таблицы";
//Определяем ширину столбцов
Table.columns(1).Width = 20;
Table.columns(2).Width = 50;
//Заполняем первую строку
Table.Cell(1, 1).Select();
Word.Selection.Font.Bold = Истина;
Word.Selection.TypeText("1");
Table.Cell(1, 2).Select();
Word.Selection.TypeText("Один");
//Заполняем вторую строку
Table.Cell(2, 1).Select();
Word.Selection.Font.Bold = Истина;
Word.Selection.TypeText("2");
Table.Cell(2, 2).Select();
Word.Selection.TypeText("Два");
//Показываем документ на экране
Word.Visible = Истина;