Objeto ConditionalStyle (Word)
Representa a formatação especial aplicada a áreas específicas de uma tabela quando a tabela selecionada é formatada com um estilo de tabela especificado.
Comentários
Use o método de condição do objeto TableStyle para retornar um objeto ConditionalStyle. A propriedade de sombreamento pode ser usada para aplicar sombreamento a áreas específicas de uma tabela. Este exemplo seleciona a primeira tabela no documento ativo e aplica sombreamento a linhas alternadas e colunas. Este exemplo pressupõe que haja uma tabela no documento ativo e que está formatada usando o estilo de grade de tabela.
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
Use a propriedade Borders para aplicar bordas a áreas específicas de uma tabela. Este exemplo seleciona a primeira tabela no documento ativo e aplica bordas à primeira e a última linha e primeira coluna. Este exemplo pressupõe que haja uma tabela no documento ativo e que está formatada usando o estilo de grade de tabela.
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
Confira também
Referência do modelo de objeto do Word
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.