Compartir a través de


Método TextStyles.Add (Publisher)

Agrega un nuevo objeto TextStyle a la colección TextStyles especificada y devuelve el nuevo objeto TextStyle .

Sintaxis

expresión. Add (StyleName, Font, ParagraphFormat, BasedOn)

expresión Variable que representa un objeto TextStyles .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
StyleName Obligatorio String Nombre del estilo de texto nuevo. Si el nombre coincide con un estilo de texto existente, el estilo de texto existente se sobrescribe.
Font Opcional Font La configuración de fuente que se va a aplicar al estilo de texto nuevo.
ParagraphFormat Opcional ParagraphFormat La configuración de párrafo que se va a aplicar al estilo de texto nuevo.
BasedOn Opcional String El nombre del estilo de texto en el que se basa el estilo de texto nuevo. Si el nombre no coincide con un estilo de texto existente, se produce un error.

Valor devuelto

TextStyle

Ejemplo

En el siguiente ejemplo se agrega un estilo de texto nuevo a la publicación activa basándose en el estilo de texto Normal.

Dim tsNew As TextStyle 
 
Set tsNew = ActiveDocument.TextStyles _ 
 .Add(StyleName:="Title", BasedOn:="Normal")

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.