Compartilhar via


Objeto Columns (Word)

Um conjunto de coluna objetos que representam as colunas em uma tabela.

Comentários

Use a propriedade Columns de um objeto de intervalo, seleção ou tabela para retornar uma coleção Columns. O exemplo seguinte exibe o número de objetos Column da coleção Columns da primeira tabela do documento ativo.

MsgBox ActiveDocument.Tables(1).Columns.Count

O exemplo a seguir cria uma tabela com seis colunas e três linhas e formata cada coluna com um percentual de sombreamento progressivamente maior (mais escuro).

Set myTable = ActiveDocument.Tables.Add(Range:=Selection.Range, _ 
 NumRows:=3, NumColumns:=6) 
For Each col In myTable.Columns 
 col.Shading.Texture = 2 + i 
 i = i + 1 
Next col

Use a Adicionar método adicionar uma coluna a uma tabela. O exemplo a seguir adiciona uma coluna à primeira tabela do documento ativo e, em seguida, ele faz com que as larguras de coluna igual.

If ActiveDocument.Tables.Count >= 1 Then 
 Set myTable = ActiveDocument.Tables(1) 
 myTable.Columns.Add BeforeColumn:=myTable.Columns(1) 
 myTable.Columns.DistributeWidth 
End If

Use colunas (Index), onde Index é o número de índice, para retornar um único objeto Column. O número de índice representa a posição da coluna da coleção Columns (contando da esquerda para a direita). O exemplo a seguir seleciona a primeira coluna da primeira tabela.

ActiveDocument.Tables(1).Columns(1).Select

Métodos

Nome
Adicionar
AutoFit
Delete
DistributeWidth
Item
Select
SetWidth

Propriedades

Nome
Aplicativo
Borders
Contagem
Creator
Primeira
Último
NestingLevel
Responsável
PreferredWidth
PreferredWidthType
Shading
Width

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.