Objeto Cells (Word)

Uma coleção da célula objetos em uma coluna da tabela, linha da tabela, seleção ou intervalo.

Comentários

Use a propriedade Cells para retornar a coleção Cells. O exemplo a seguir formata as células na primeira linha da tabela um do documento ativo para ficarem largura de 30 pontos.

ActiveDocument.Tables(1).Rows(1).Cells.Width = 30

O exemplo a seguir retorna o número de células da linha atual.

num = Selection.Rows(1).Cells.Count

Use a Adicionar método para adicionar um objeto Cell para o conjunto de células. Você também pode usar o InsertCells método do objeto Selection para inserir novas células. O exemplo seguinte adiciona uma célula antes da primeira célula de myTable.

Set myTable = ActiveDocument.Tables(1) 
myTable.Range.Cells.Add BeforeCell:=myTable.Cell(1, 1)

Use Cell (linha, coluna), em que a linha é o número da linha e a coluna é o número da coluna ou Células (índice), em que o índice é o número do índice, para retornar um objeto Cell . O exemplo seguinte aplica sombreamento à segunda célula na primeira linha da tabela um.

Set myCell = ActiveDocument.Tables(1).Cell(Row:=1, Column:=2) 
myCell.Shading.Texture = wdTexture20Percent

O exemplo a seguir aplica sombreado à primeira célula da primeira linha.

ActiveDocument.Tables(1).Rows(1).Cells(1).Shading _ 
 .Texture = wdTexture20Percent

Comentários

Use o método Add com o conjunto de linhas ou colunas para adicionar uma linha ou uma coluna de células. O exemplo seguinte adiciona uma coluna à primeira tabela do documento ativo e insere números da primeira coluna.

Set myTable = ActiveDocument.Tables(1) 
Set aColumn = myTable.Columns.Add(BeforeColumn:=myTable.Columns(1)) 
For Each aCell In aColumn.Cells 
 aCell.Range.Delete 
 aCell.Range.InsertAfter num + 1 
 num = num + 1 
Next aCell

Métodos

Propriedades

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.