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 MsoTriState qui représente l’état de la propriété Bold sur les caractères d’une plage de texte. Lecture-écriture.
Syntaxe
expression. Gras
expression Variable qui représente un objet Font .
Valeur renvoyée
MsoTriState
Remarques
La valeur de la propriété Bold peut être une des constantes MsoTriState suivantes déclarées dans la bibliothèque de type Microsoft Office.
| Constante | Description |
|---|---|
| msoFaux | Aucun des caractères de la plage n'est mis en gras. |
| msoTriEtatMélangé | Valeur de retour indiquant que la plage contient du texte mis en forme en gras et d’autres non mis en forme en gras. |
| msoTriStateToggle | Une valeur définie qui bascule entre msoTrue et msoFalse. |
| msoVrai | Tous les caractères de la plage de texte sont mis en gras. |
Exemple
Cet exemple teste tout le texte du deuxième article de la publication active. Si le texte contient à la fois du texte en gras et non gras, il met tout le texte en gras. Si le texte est tout en gras ou pas en gras, un message s’affiche pour informer l’utilisateur qu’il n’y a pas de gras mixte. Pour que ce code s'exécute correctement, la composition active doit comporter au moins deux articles de texte.
Sub BoldStory()
Dim stf As Publisher.Font
Set stf = Application.ActiveDocument.Stories(2).TextRange.Font
With stf
If .Bold = msoTriStateMixed Then
.Bold = msoTrue
Else
MsgBox "Mixed bolding is not in this story."
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.