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

Вниз

WordApplication   Найти похожие ветки 

 
Марина   (2002-02-04 13:51) [0]

Есть Word-овская таблица,созданная с помощью WordApplication.Подскажите, пожалуйста, как программно вставить значения в ячейки этой таблицы? Заранее спасибо.


 
drpass ©   (2002-02-04 14:26) [1]

Вот такой код создает по шаблону документ (шаблон с таблицей) и заносит значения в пару ячеек
app:=CreateOleObject("Word.Application");
app.Visible:=true;
doc:=app.Documents.Add(Params.Template);
doc.Tables.Item(1).Cell(2,1).Select;
Sel:=app.Selection;
Sel.TypeText(MaskEdit1.Text);
Sel.MoveRight(wdCell, 1);
Sel.TypeText(Params.RegCod);


 
fag2000@ok.ru ©   (2002-02-04 14:27) [2]

Через Cell.
Пример есть в помоши по VBA в Word.


 
skiph ©   (2002-02-05 06:14) [3]

Не везде такой код пройдет. Другой способ - поставить курсор в нужное место (процедуры MoveLeft, MoveRigth, MoveDown, MoveUp) и вставить текст (TypeText). Способ кривоватый, но работает везде.



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

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

Наверх




Память: 0.47 MB
Время: 0.01 c
3-66484
EternalWonderer
2002-01-23 20:48
2002.02.21
Получение списка алиасов Net8


1-66576
Yakudza
2002-02-05 12:49
2002.02.21
Timestamp parameters with zero scale


1-66531
Potemkin
2002-02-07 09:39
2002.02.21
DBGrid


1-66621
[Genius]
2002-02-03 08:15
2002.02.21
dll


1-66622
Dmitriy_R
2002-02-01 11:05
2002.02.21
Помогите разобратся что я делаю не так?