constant indicating whether you can set the color of diacritics in the specified text range. Read/write.
| MsoTriState can be one of these MsoTriState constants. |
| msoCTrue Not used with this property. |
| msoFalse The color of diacritics cannot be set in the specified text range. |
| msoTriStateMixed Return value indicating a combination of msoTrue and msoFalse for the specified text range. |
| msoTriStateToggle Set value which toggles between msoTrue and msoFalse. |
| msoTrue The color of diacritics can be set in the specified text range. |
expression.UseDiacriticColor
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example test the text in the first story of the publication for the state of the UseDiacriticColor property. If it is msoTrue, then the DiacriticColor is set to blue otherwise, a message box is displayed.
Sub UseDiaColor()
Dim fntDC As Font
Set fntDC = Application.ActiveDocument.Stories(1).TextRange.Font
If fntDC.UseDiacriticColor = msoTrue Then
fntDC.DiacriticColor.RGB = RGB(Red:=0, Green:=0, Blue:=255)
Else
MsgBox "The UseDiacriticColor property is set to False"
End If
End Sub