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.
Crée un objet WordArt. Renvoie un objet Shape qui représente le nouvel objet WordArt.
Syntaxe
expression.
AddTextEffect( _PresetTextEffect_, _Text_, _FontName_, _FontSize_, _FontBold_, _FontItalic_, _Left_, _Top_ )
expression Variable qui représente un objet Shapes.
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| PresetTextEffect | Requis | MsoPresetTextEffect | Effet de texte prédéfini. |
| Text | Obligatoire | Chaîne | Texte dans l'objet WordArt. |
| FontName | Obligatoire | Chaîne | Nom de la police utilisée dans l'objet WordArt. |
| FontSize | Obligatoire | Simple | Taille (en points) de la police utilisée dans l'objet WordArt. |
| FontBold | Obligatoire | MsoTriState | Détermine si la police utilisée dans l’objet WordArt est définie sur gras ou non. |
| FontItalic | Obligatoire | MsoTriState | Détermine si la police utilisée dans l’objet WordArt est définie sur italique ou non. |
| Left | Obligatoire | Unique | Position, exprimée en points, du bord gauche de la zone de délimitation de l’objet WordArt par rapport au bord gauche de la diapositive. |
| Top | Obligatoire | Unique | Position, exprimée en points, du bord supérieur de la zone de délimitation de l’objet WordArt par rapport au bord supérieur de la diapositive. |
Valeur renvoyée
Shape
Remarques
Quand vous ajoutez un objet WordArt à un document, la hauteur et largeur de l'objet sont définies automatiquement selon la taille et quantité de texte que vous spécifiez.
Exemple
Cet exemple ajoute un objet WordArt qui contient le texte « Test » à myDocument.
Set myDocument = ActivePresentation.Slides(1)
Set newWordArt = myDocument.Shapes _
.AddTextEffect(PresetTextEffect:=msoTextEffect1, _
Text:="Test", FontName:="Arial Black", FontSize:=36, _
FontBold:=msoFalse, FontItalic:=msoFalse, Left:=10, Top:=10)
Voir aussi
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.