Método Table.AutoFormat (Word)
Aplica una presentación previamente definida a una tabla.
Sintaxis
expresión. AutoFormat( _Format_ , _ApplyBorders_ , _ApplyShading_ , _ApplyFont_ , _ApplyColor_ , _ApplyHeadingRows_ , _ApplyLastRow_ , _ApplyFirstColumn_ , _ApplyLastColumn_ , _AutoFit_ )
expresión requerida. Variable que representa un objeto 'Table'.
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Format | Opcional | Variant | El formato que se debe aplicar. Este parámetro puede ser una constante WdTableFormat, una constante WdTableFormatApply o un objeto TableStyle. |
| ApplyBorders | Opcional | Variant | True para aplicar las propiedades de borde del formato especificado. El valor predeterminado es True. |
| ApplyShading | Opcional | Variant | True para aplicar las propiedades de sombreado del formato especificado. El valor predeterminado es True. |
| ApplyFont | Opcional | Variant | True para aplicar las propiedades de fuente del formato especificado. El valor predeterminado es True. |
| ApplyColor | Opcional | Variant | True para aplicar las propiedades de color del formato especificado. El valor predeterminado es True. |
| ApplyHeadingRows | Opcional | Variant | True para aplicar las propiedades de fila de títulos del formato especificado. El valor predeterminado es True. |
| ApplyLastRow | Opcional | Variant | True para aplicar las propiedades de última fila del formato especificado. El valor predeterminado es False. |
| ApplyFirstColumn | Opcional | Variant | True para aplicar las propiedades de primera columna del formato especificado. El valor predeterminado es True. |
| ApplyLastColumn | Opcional | Variant | True para aplicar las propiedades de última columna del formato especificado. El valor predeterminado es False. |
| AutoFit | Opcional | Variant | True para reducir el ancho de las columnas de tabla tanto como sea posibles sin cambiar el texto de la forma se ajusta en las celdas. El valor predeterminado es True. |
Comentarios
Los argumentos para este método corresponden a las opciones en el cuadro de diálogo Autoformato de tablas.
Ejemplo:
En este ejemplo, se inserta una tabla 5 x 5 en un nuevo documento y se le aplican todas las propiedades del formato Colorful2.
Set newDoc = Documents.Add
Set myTable = newDoc.Tables.Add(Range:=Selection.Range, _
NumRows:=5, NumColumns:=5)
myTable.AutoFormat Format:=wdTableFormatColorful2
En este ejemplo, se aplican todas las propiedades del formato Classic2 a la tabla en la que se encuentra actualmente el punto de inserción. Si el punto de inserción no está en la tabla, aparecerá un cuadro de mensaje.
Selection.Collapse Direction:=wdCollapseStart
If Selection.Information(wdWithInTable) = True Then
Selection.Tables(1).AutoFormat Format:=wdTableFormatClassic2
Else
MsgBox "The insertion point is not in a table."
End If
Consulte también
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.