Partager via


Propriété Font.DiacriticColor (Publisher)

Cette propriété renvoie un objet ColorFormat représentant la couleur 24 bits utilisée pour les signes diacritiques d'une composition rédigée dans une langue qui se lit de droite à gauche.

Syntaxe

expression. DiacriticColor

Expression Variable qui représente un objet Font .

Valeur renvoyée

ColorFormat

Exemple

Cet exemple montre comment tester le texte du premier article de la composition actuelle pour déterminer si sa couleur est rouge et s’il est mis en forme de droite à gauche.

Sub FontDiColor() 
 
 Dim fntDiColor As Font 
 
 Set fntDiColor = Application.ActiveDocument. _ 
 Stories(1).TextRange.Font 
 
 If fntDiColor.UseDiacriticColor = msoTrue And _ 
 fntDiColor.DiacriticColor.RGB = RGB(255, 0, 0) Then 
 MsgBox "Your text is red" 
 Else 
 MsgBox "This is not a right-to-left language" _ 
 & " or your color is not red" 
 End If 
 
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.