Edit

Font.UseDiacriticColor property (Publisher)

  • Article

Returns or sets an MsoTriState constant indicating whether you can set the color of diacritics in the specified text range. Read/write.

Syntax

expression.UseDiacriticColor

expression A variable that represents a Font object.

Return value

MsoTriState

Remarks

The UseDiacriticColor property value can be one of the MsoTriState constants declared in the Microsoft Office type library and shown in the following table.

Constant Description
msoFalse The color of diacritics cannot be set in the specified text range.
msoTriStateMixed A return value indicating a combination of msoTrue and msoFalse for the specified shape range.
msoTriStateToggle A set value that switches between msoTrue and msoFalse.
msoTrue The color of diacritics can be set in the specified text range.

Example

This example tests the text in the first story of the publication for the state of the UseDiacriticColor property. If it is msoTrue, the DiacriticColor property value 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

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.