Compartir a través de


Método Selection.InsertCells (Word)

Agrega celdas a una tabla existente.

Sintaxis

expresión. InsertCells( _ShiftCells_ )

expresión requerida. Variable que representa un objeto Selection.

Parámetros

Nombre Obligatorio/opcional Tipo de datos Descripción
ShiftCells Opcional WdInsertCells Especifica cómo insertar las celdas en las columnas y filas existentes de la tabla.

Comentarios

El número de celdas insertadas es igual al número de celdas de la selección. También puede insertar celdas utilizando el método Add del objeto Cells.

Ejemplo:

En este ejemplo se insertan nuevas celdas a la izquierda de las celdas seleccionadas y, a continuación, se rodean las celdas seleccionadas con un borde rojo de una sola línea.

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

Consulte también

Objeto Selection

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.