TextEffectFormat.KernedPairs property (Publisher)

Sets or returns an MsoTriState constant that indicates whether character pairs in a WordArt object have been kerned. Read/write.

Syntax

expression.KernedPairs

expression A variable that represents a TextEffectFormat object.

Return value

MsoTriState

Remarks

The KernedPairs 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	Character pairs in the specified WordArt object have not been kerned.
msoTriStateToggle	Switches between msoTrue and msoFalse.
msoTrue	Character pairs in the specified WordArt object have been kerned.

Example

This example turns on character pair kerning for all WordArt objects in the active publication.

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

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.