Método Cell.SetWidth (Word)

Establece el ancho de las columnas o celdas de una tabla.

Sintaxis

expresión. SetWidth( _ColumnWidth_ , _RulerStyle_ )

expresión requerida. Variable que representa un objeto 'Cell'.

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
ColumnWidth Obligatorio Single Ancho, en puntos, de la columna o columnas especificadas.
RulerStyle Obligatorio WdRulerStyle Controla la forma en que Word ajusta los anchos de celda.

Comentarios

El comportamiento de WdRulerStyle descrito anteriormente se aplica a las tablas alineadas a la izquierda. El comportamiento de WdRulerStyle para tablas centradas o alineadas a la derecha puede ser inesperado; en estos casos, el método SetWidth debe usarse con cuidado.

Ejemplo:

En este ejemplo, se inserta una tabla en un nuevo documento y se establece el ancho de la primera celda de la segunda fila en 1,5 pulgadas. En el ejemplo se mantiene el ancho del resto de las celdas de la tabla.

Set newDoc = Documents.Add 
Set myTable = _ 
 newDoc.Tables.Add(Range:=Selection.Range, NumRows:=3, _ 
 NumColumns:=3) 
myTable.Cell(2,1).SetWidth _ 
 ColumnWidth:=InchesToPoints(1.5), _ 
 RulerStyle:=wdAdjustNone

En este ejemplo se establece el ancho de la celda que contiene el punto de inserción en 36 puntos. También se reduce el ancho de la primera columna para conservar la posición del borde derecho de la tabla.

If Selection.Information(wdWithInTable) = True Then 
 Selection.Cells(1).SetWidth ColumnWidth:=36, _ 
 RulerStyle:=wdAdjustFirstColumn 
Else 
 MsgBox "The insertion point is not in a table." 
End If

Consulte también

Cell (objeto)

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.