Форум: "Начинающим";
Текущий архив: 2008.08.31;
Скачать: [xml.tar.bz2];

Вниз

Работа с бордюрами Word -таблица   Найти похожие ветки 

← →
Dimich1978   (2008-07-24 15:25) [0]

Пишу код
 W.SElection.Borders.LineStyle := wdLineStyleNone;
Для того чтобы сощзданная таблица была при печати не видна. Но выдает ошибку что метода LineStyle- нет.
Вот что выдрал из макроса
Selection.Borders(wdBorderTop).LineStyle = wdLineStyleNone
   Selection.Borders(wdBorderLeft).LineStyle = wdLineStyleNone
   Selection.Borders(wdBorderBottom).LineStyle = wdLineStyleNone
   Selection.Borders(wdBorderRight).LineStyle = wdLineStyleNone
   Selection.Borders(wdBorderVertical).LineStyle = wdLineStyleNone
   Selection.Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone
   Selection.Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone
Как можно убрать бордюры у таблицы. Заранее спасибо.

---

← →
DFT   (2008-07-24 15:36) [1]

А если писать также...?

W.SElection.Borders(wdBorderTop).LineStyle := wdLineStyleNone;

---

← →
Dimich1978   (2008-07-24 15:38) [2]

В таком случае Borders не является методом.

---

← →
Anatoly Podgoretsky ©   (2008-07-24 15:45) [3]

Вот что говорит MSDN, что такое Borders

> Use the Borders property to return the Borders collection

От себя добавлю, что это индексированое свойство.

---

← →
DFT   (2008-07-24 16:28) [4]

Насколько я знаю, структуры данных используемые в Word, аналогичны, и для VBA и для любых приложений использующих его СOM интерфейс (если вы рабатаете непосредственно, без применения каких-либо связывающих "компонентов-адаптеров").

---

← →
Vlad Oshin ©   (2008-07-24 17:05) [5]

а так?
Selection.Cells.Borders.Item(wdBorderLeft).LineStyle:=wdLineStyleNone;

---

← →
clickmaker ©   (2008-07-24 17:20) [6]

а так?
Selection.Borders[wdBorderTop].LineStyle

---

← →
DFT   (2008-07-24 17:50) [7]

Еще можно попробовать использовать индексированный доступ к таблицам.
Ворда под рукой нет, но помоему, что-то вроде...
ActiveDocument.Range.Table[i]. ... и посмотреть какие свойства есть у объекта-таблицы.
Возможно там регулируются и стиль ее границ

---

← →
DFT   (2008-07-24 23:41) [8]

Самому интересно стало.
Правильно будет так ...

ActiveDocument.Range.Tables(1).Borders(wdBorderVertical).LineStyle = wdLineStyleNone
ActiveDocument.Range.Tables(1).Borders(wdBorderHorizontal).LineStyle = wdLineStyleNone

---

← →
Dimich1978   (2008-07-25 12:42) [9]

Вот это метод у меня работает(Д7-ХРСП2-2003ворд)
 W.Selection.Cells.Borders.Item(wdBorderLeft).LineStyle:=wdLineStyleNone;
А это не пашет:
W.ActiveDocument.Range.Tables(1).Borders(wdBorderVertical).LineStyle = wdLineStyleNone

---

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

Форум: "Начинающим";
Текущий архив: 2008.08.31;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.46 MB
Время: 0.006 c