Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.12.18;
Скачать: CL | DM;

Вниз

нужно кинуть таблицу (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 записей в екселе и нужно автоматом сделать шаблоны в ворде



Страницы: 1 вся ветка

Текущий архив: 2005.12.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.053 c
2-1133431193
FShadow
2005-12-01 12:59
2005.12.18
Выбор дочерних MDI-окон с помощью набора закладок TabControl. Как


14-1133011647
rosermark
2005-11-26 16:27
2005.12.18
отдам стопку дисков с софтом всем желающим.


1-1132569064
DN
2005-11-21 13:31
2005.12.18
В TWebBrowser загружаю страницу, как после окончания загрузки зап


2-1133512097
MakNik
2005-12-02 11:28
2005.12.18
MessageBox


2-1133433950
linox
2005-12-01 13:45
2005.12.18
нужно кинуть таблицу (2, 12) в WORD