нужно кинуть таблицу (2, 12) в WORD

← →
linox (2005-12-01 13:45) [0]

Сначала кажется идет:
wordapplication1.Selection.
а что дальше не могу подобрать.....
подскажите пожалуйста

← →
SergGG © (2005-12-01 15:22) [1]

Может это тебе поможет:

procedure TWordDoc.TableItem(Row,Col:integer;Text:String;Table:integer); var ItemTable:Tables; begin ItemTable:=WordApplication1.ActiveDocument.Tables; ItemTable.Item(Table).Cell(Row,Col).Range.InsertAfter(Text); end;
Table--№ таблицы в Worde

← →
linox (2005-12-01 16:30) [2]

2 SergGG:
ItemTable.Item(Table).Cell(Row,Col).Range.InsertAfter(Text);
^
||
что здесь нужно писать? (вместо Table)
если писать цифру (integer), то нельзя вписывать Cell(Row,Col).Range???

← →
SergGG © (2005-12-01 17:00) [3]

Если у тебя есть таблица в Worde, то должно работать

Table - цифра

← →
linox (2005-12-02 16:11) [4]

2 SergGG
нету, ее нужно создать,
потому что есть 6000 записей в екселе и нужно автоматом сделать шаблоны в ворде

нужно кинуть таблицу (2, 12) в WORD Найти похожие ветки