v8: Оформление таблицы Word. OLE Automation.

03.11.2013 18:02

Прочитано: 4283

Создается таблица в Word. Как задать цвет границ таблицы???
Rng8.I_nsertAfter("1, 2, 3");
Rng8.I_nsertParagraphAfter();
Rng8.I_nsertAfter("4, 5, 6");
Rng8.I_nsertParagraphAfter();
Rng8.I_nsertAfter("7, 8, 9");
Rng8.I_nsertParagraphAfter();
Rng8.ConvertToTable(",");

Yandex

Возможно, вас также заинтересует

E_Migachev

04.11.2013 22:01

Ответ № 1

(0) maksyandra, посмотри файл с описанием работы с WORD Скачивать файлы может только зарегистрированный пользователь!

из него:
В ходе работы с таблицей вам может понадобиться разукрасить линии разным цветом для придания более красочного вида таблице. Для этого вы можете воспользоваться разными программными кодами.

В первом примере кода мы используем встроенные константы для определения цвета линии. Синтаксис можно вольно перевести так:
<объект_ТАБЛИЦА>.<ЯЧЕЙКА>(номер_строки, номер_столбца).<ГРАНИЦЫ>(верхняя_граница).<ЦВЕТ> = <константа_ЦВЕТ_СИНИЙ>
После знака равно вы можете подставить любую встроенную цветовую константу VB.
'делаем цвет верхней линии (границы) ячейки синим

Код VBS

 TableWord.Cell(9, 1).Borders(wdBorderTop).Color = wdColorBlue

Если среди встроенных цветовых констант вам не удалось найти нужного вам цвета, то вы всегда можете воспользоваться функцией RGB и задать необходимый вам цвет в цифровом коде.
'делаем цвет верхней линии (границы) ячейки произвольным

Код VBS

 TableWord.Cell(10, 1).Borders(wdBorderTop).Color = RGB(100, 200, 50)

Подсказка: Для быстрого перемещения к последнему ответу или к вопросу используйте или .