Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Agrega un nuevo objeto Shape que representa un objeto WordArt a la colección Shapes especificada.
Sintaxis
expresión. AddTextEffect (PresetTextEffect, Text, FontName, FontSize, FontBold, FontItalic, Left, Top)
expresión Variable que representa un objeto Shapes.
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| PresetTextEffect | Obligatorio | MsoPresetTextEffect | Efecto de texto preestablecido que se va a usar. Los valores de las constantes MsoPresetTextEffect corresponden a los formatos que aparecen en el cuadro de diálogo Galería de WordArt (numerado de izquierda a derecha y de arriba a abajo). Puede ser una de las constantes MsoPresetTextEffect declaradas en la biblioteca de tipos de Microsoft Office. No se admite la constante msoTextEffectMixed. |
| Text | Obligatorio | String | Texto que se va a utilizar para el objeto de WordArt. |
| FontName | Obligatorio | String | Nombre de la fuente que se va a utilizar para el objeto de WordArt. |
| FontSize | Obligatorio | Variant | Tamaño de la fuente que se va a usar para el objeto de WordArt. Los valores numéricos se evalúan en puntos; Las cadenas pueden estar en cualquier unidad compatible con Microsoft Publisher (por ejemplo, "2,5 in"). |
| FontBold | Obligatorio | MsoTriState | Determina si se va a aplicar el formato de negrita al texto de WordArt. |
| FontItalic | Obligatorio | MsoTriState | Determina si se va a aplicar el formato de cursiva al texto de WordArt. |
| Left | Obligatorio | Variant | Posición del borde izquierdo de la forma que representa el objeto de WordArt. |
| Top | Obligatorio | Variant | Posición del borde superior de la forma que representa el objeto de WordArt. |
Valor devuelto
Forma
Comentarios
Para los parámetros Left y Top , los valores numéricos se evalúan en puntos; Las cadenas pueden estar en cualquier unidad admitida por Publisher (por ejemplo, "2,5 in").
El alto y el ancho del objeto de WordArt están determinados por el texto y el formato correspondientes.
Utilice la propiedad Shape.TextEffect para devolver un objeto TextEffectFormat cuyas propiedades se pueden usar para editar un objeto WordArt existente.
El parámetro FontBold puede ser una de las constantes MsoTriState declaradas en la biblioteca de tipos de Microsoft Office y mostradas en la tabla siguiente.
| Constante | Descripción |
|---|---|
| msoFalse | No se aplica el formato de negrita al texto de WordArt. |
| msoTrue | Se aplica el formato de negrita al texto de WordArt. |
El parámetro FontItalic puede ser una de las constantes MsoTriState que se muestran en la tabla siguiente.
| Constante | Descripción |
|---|---|
| msoFalse | No se aplica el formato de cursiva al texto de WordArt. |
| msoTrue | Se aplica el formato de cursiva al texto de WordArt. |
Ejemplo
En el siguiente ejemplo se agrega un objeto de WordArt a la primera página de la publicación activa.
Dim shpWordArt As Shape
Set shpWordArt = ActiveDocument.Pages(1).Shapes.AddTextEffect _
(PresetTextEffect:=msoTextEffect7, Text:="Annual Report", _
FontName:="Arial Black", FontSize:=24, _
FontBold:=msoFalse, FontItalic:=msoFalse, _
Left:=144, Top:=72)
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.