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.