Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Retorna um objeto Column que representa a coluna de tabela que contém a célula especificada. Somente leitura.
Sintaxe
expressão. Coluna
expressão Obrigatório. Uma variável que representa um objeto "Célula".
Exemplo
Este exemplo cria uma tabela 3x5 e aplica sombreamento às colunas pares.
Dim tableNew As Table
Dim cellLoop As Cell
Selection.Collapse Direction:=wdCollapseStart
Set tableNew = _
ActiveDocument.Tables.Add(Range:=Selection.Range, _
NumRows:=3, NumColumns:=5)
For Each cellLoop In tableNew.Rows(1).Cells
If cellLoop.ColumnIndex Mod 2 = 0 Then
cellLoop.Column.Shading.Texture = wdTexture10Percent
End If
Next cellLoop
Confira também
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.