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

Вниз

Работа с ячейками таблицы Word   Найти похожие ветки 

 
Alex Y ©   (2002-04-08 04:59) [0]

Вот такой возник вопрос.
Через COMObject форматирую таблицу в Word"е. Хочу убрать (добавить) Верхнюю границу текущей ячейки. В Worde при создании макроса, VB ссылается на свойство Borders. Пытаюсь обратиться к нему через COM - пишет "Метод COM отсутствует".
Может кто подскажет как мне правильно обратиться к ячейке.


 
Леха   (2002-04-08 10:11) [1]

Пиши пришлю исходник в котором производятся разные хитрые операции с ячейками ворда

а вобщето такие вещи надо искать в библиотеке типов


 
ghost_by ©   (2002-04-08 19:47) [2]

wa.Selection.Borders.Item( BORDER).LineStyle:=wa.Options.DefaultBorderLineStyle; - изменяет бордер у выделенной ячейки.

где:
wa - WordApplication,
BORDER - (-1) - верхний, (-2) - левый, (-3) - правый, (-4) - нижний бордер.
wa.Options.DefaultBorderLineStyle - стиль линии по умолчанию.


 
Alex Y ©   (2002-04-09 04:20) [3]

2 Леха
Если не трудно товышли agyabrov@yandex.ru

2 ghost_by
Пробовал, ругается на Borders.


 
ghost_by ©   (2002-04-09 13:32) [4]

Вместо BORDERS - нужно писать либо -1, либо -2, -3, -4, что соответственно означает - верхний, левый, правый, нижний бордер.
Пример:
верхний:wa.Selection.Borders.Item(-1).LineStyle:=wa.Options.DefaultBorderLineStyle
левый :wa.Selection.Borders.Item(-2).LineStyle:=wa.Options.DefaultBorderLineStyle
правый :wa.Selection.Borders.Item(-3).LineStyle:=wa.Options.DefaultBorderLineStyle
нижний :wa.Selection.Borders.Item(-4).LineStyle:=wa.Options.DefaultBorderLineStyle



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

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

Наверх




Память: 0.47 MB
Время: 0.011 c
1-69865
roman001
2002-04-07 08:09
2002.04.22
MDI


1-69798
Zombie
2002-04-10 15:04
2002.04.22
Как увидеть const array в другом юните???


1-69897
ymin
2002-04-09 13:56
2002.04.22
Есть ли Help в минимальной установке Delphi 6?


1-69861
Dimedrol
2002-04-02 10:47
2002.04.22
Interprocess data X-change...


7-70043
dim2001
2002-01-26 16:20
2002.04.22
Переключиться Eng - Rus