Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Renvoie ou définit une constante MsoPresetTextEffectShape qui représente la forme de l’objet WordArt spécifié. Lecture-écriture.
Syntaxe
expression. PresetShape
expression Variable qui représente un objet TextEffectFormat .
Valeur renvoyée
MsoPresetTextEffectShape
Remarques
La valeur de la propriété PresetShape peut être l’une des constantes MsoPresetTextEffectShape déclarées dans la bibliothèque de types Microsoft Office.
Exemple
Cet exemple définit la forme de la première forme de la première page de la composition active : un chevron dont le centre est orienté vers le bas. Pour que cet exemple fonctionne, la première forme doit être une forme WordArt.
Sub ChangeTextEffect()
With ActiveDocument.Pages(1).Shapes(1)
If .Type = msoTextEffect Then
.TextEffect.PresetShape = msoTextEffectShapeChevronDown
End If
End With
End Sub
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.