Developing.ru

Как создать несколько таблиц в документе Word через OLE?

Использую следующий код:
{
Variant Word, Document, Table;

Word = CreateOleObject("Word.Application.8");
Word.OlePropertySet("Visible", true);
Word.OlePropertyGet("Documents").OleProcedure("Add");
Document = Word.OlePropertyGet("Documents").OleFunction("Item", 1);
Document.OlePropertyGet("Tables").OleFunction("Add", Document.OleFunction("Range", 0, 0), 5, 5);
Document.OlePropertyGet("Tables").OleFunction("Add", Document.OleFunction("Range", 0, 0), 3, 3);
Table = Document.OlePropertyGet.("Tables").OleFunction("Item", 1);
}

При таком задании вторая таблица создается в первой ячейке первой таблицы. Что я делаю неправильно?

Полагаю, это из-за того, что курсор после создания первой таблицы находится в ее первой ячейке. Уводите курсор под таблицу

To bi-lya: А как это сделать?