Método Selection.InsertCells (Word)

Adiciona células a uma tabela existente.

Sintaxe

expression. InsertCells( _ShiftCells_ )

expressão Obrigatório. Uma variável que representa um objeto Selection.

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
ShiftCells Opcional WdInsertCells Especifica como inserir as células nas colunas e linhas existentes da tabela.

Comentários

O número de células inserido é igual ao número de células da seleção. Você também pode inserir células usando o método Add do objeto Cells.

Exemplo

Este exemplo insere novas células à esquerda das células selecionadas e envolve as células selecionadas com uma borda vermelha de uma linha.

If Selection.Cells.Count >= 1 Then 
 Selection.InsertCells ShiftCells:=wdInsertCellsShiftRight 
 For Each aBorder In Selection.Borders 
 aBorder.LineStyle = wdLineStyleSingle 
 aBorder.ColorIndex = wdRed 
 Next aBorder 
End If

Confira também

Objeto Selection

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.