Поделиться через

Объект ConditionalStyle (Word)

  • Статья

Представляет специальное форматирование, применяемое к указанным областям таблицы, если выбранная таблица отформатирована с заданным стилем таблицы.

Замечания

Используйте метод Condition объекта TableStyle , чтобы вернуть объект ConditionalStyle . Свойство Shading можно использовать для применения заливки к указанным областям таблицы. В этом примере выбирается первая таблица в активном документе и применяется заливка к альтернативным строкам и столбцам. В этом примере предполагается, что в активном документе есть таблица и что она отформатирована с использованием стиля сетки таблиц.

Sub ApplyConditionalStyle() 
 With ActiveDocument 
 .Tables(1).Select 
 With .Styles("Table Grid").Table 
 .Condition(wdOddColumnBanding).Shading _ 
 .BackgroundPatternColor = wdColorGray10 
 .Condition(wdOddRowBanding).Shading _ 
 .BackgroundPatternColor = wdColorGray10 
 End With 
 End With 
End Sub

Используйте свойство Borders для применения границ к указанным областям таблицы. В этом примере выбирается первая таблица в активном документе и применяются границы к первой и последней строкам и первому столбцу. В этом примере предполагается, что в активном документе есть таблица и что она отформатирована с использованием стиля сетки таблиц.

Sub ApplyTableBorders() 
 With ActiveDocument 
 .Tables(1).Select 
 With .Styles("Table Grid").Table 
 .Condition(wdFirstRow).Borders(wdBorderBottom) _ 
 .LineStyle = wdLineStyleDouble 
 .Condition(wdFirstColumn).Borders(wdBorderRight) _ 
 .LineStyle = wdLineStyleDouble 
 .Condition(wdLastRow).Borders(wdBorderTop) _ 
 .LineStyle = wdLineStyleDouble 
 End With 
 End With 
End Sub

См. также

Справочник по объектной модели Word

Поддержка и обратная связь

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