Propriedade TableStyle.ColumnStripe (Word)

Retorna ou define um valor Long que representa o número de colunas na faixa quando um estilo especifica faixas de colunas ímpares ou pares. Leitura/gravação.

Sintaxe

expression. ColumnStripe

Expressão Uma variável que representa um objeto 'TableStyle'.

Comentários

Use o método de condição para definir faixas de colunas ímpares ou pares para um estilo de tabela.

Exemplo

Este exemplo cria e formata um novo estilo de tabela e aplica o novo estilo a uma nova tabela. O estilo resultante faz com que cada grupo de três colunas a cada terceira coluna e grupo de duas linhas a cada segunda coluna tenha um sombreamento de 20%.

Sub NewTableStyle() 
 Dim styTable As Style 
 
 With ActiveDocument 
 Set styTable = .Styles.Add(Name:="TableStyle 1", _ 
 Type:=wdStyleTypeTable) 
 
 With .Styles("TableStyle 1").Table 
 .Condition(wdEvenColumnBanding).Shading _ 
 .Texture = wdTexture20Percent 
 .ColumnStripe = 3 
 .Condition(wdEvenRowBanding).Shading _ 
 .Texture = wdTexture20Percent 
 .RowStripe = 2 
 End With 
 
 With .Tables.Add(Range:=Selection.Range, NumRows:=15, _ 
 NumColumns:=15) 
 .Style = ActiveDocument.Styles("TableStyle 1") 
 End With 
 End With 
 
End Sub

Confira também

Objeto TableStyle

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.