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.
Devuelve o establece una constante MsoPresetTextEffectShape que representa la forma del WordArt especificado. Lectura y escritura.
Sintaxis
expresión. PresetShape
expresión Variable que representa un objeto TextEffectFormat .
Valor devuelto
MsoPresetTextEffectShape
Observaciones
El valor de la propiedad PresetShape puede ser una de las constantes MsoPresetTextEffectShape declaradas en la biblioteca de tipos de Microsoft Office.
Ejemplo
En este ejemplo se estable la forma de la primera forma de la primera página de la publicación activa en un cheurón con el centro hacia abajo. Para que este ejemplo funcione, la primera forma debe ser una forma de WordArt.
Sub ChangeTextEffect()
With ActiveDocument.Pages(1).Shapes(1)
If .Type = msoTextEffect Then
.TextEffect.PresetShape = msoTextEffectShapeChevronDown
End If
End With
End Sub
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.