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.
Définit ou renvoie une constante MsoTriState qui indique si les paires de caractères d’un objet WordArt ont été crénées. Lecture-écriture.
Syntaxe
expression. KernedPairs
expression Variable qui représente un objet TextEffectFormat .
Valeur renvoyée
MsoTriState
Remarques
La valeur de la propriété KernedPairs peut être une des constantes MsoTriState déclarées dans la bibliothèque de type Microsoft Office et affichées dans le tableau suivant.
| Constante | Description |
|---|---|
| msoFaux | Les paires de caractères de l'objet WordArt spécifié n'ont pas subi de crénage. |
| msoTriStateToggle | Bascule entre msoTrue et msoFalse. |
| msoVrai | Les paires de caractères de l'objet WordArt spécifié ont subi un crénage. |
Exemple
Cet exemple active le crénage des caractères pour tous les objets WordArt de la composition active.
Sub KernedWordArt()
Dim pagPage As Page
Dim shpShape As Shape
For Each pagPage In ActiveDocument.Pages
For Each shpShape In pagPage.Shapes
If shpShape.Type = msoTextEffect Then
shpShape.TextEffect.KernedPairs = msoTrue
End If
Next
Next
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.