Compartilhar via


Método Columns.Add (Word)

Retorna um objeto Column que representa uma coluna adicionada a uma tabela.

Sintaxe

expressão. Adicionar (BeforeColumn)

expressão Obrigatório. Uma variável que representa uma coleção 'Columns'.

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
BeforeColumn Opcional Variant Um objeto Column que representa a coluna que irá aparecer imediatamente à direita da nova coluna.

Valor de retorno

Coluna

Exemplo

Este exemplo cria no documento ativo uma tabela com duas colunas e duas linhas e adiciona outra coluna antes da primeira coluna. A largura da nova coluna é definida como 1,5 polegada (3,81 centímetros).

Sub AddATable() 
 Dim myTable As Table 
 Dim newCol As Column 
 
 Set myTable = ActiveDocument.Tables.Add(Selection.Range, 2, 2) 
 Set newCol = myTable.Columns.Add(BeforeColumn:=myTable.Columns(1)) 
 newCol.SetWidth ColumnWidth:=InchesToPoints(1.5), _ 
 RulerStyle:=wdAdjustNone 
End Sub

Confira também

Objeto da coleção Columns

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.