NormalizedHeight Property

       

MsoTrue if all characters (both uppercase and lowercase) in the specified WordArt are the same height. Read/write MsoTriState.

MsoTriState can be one of these MsoTriState constants.
msoCTrue Not used with this property.
msoFalse Characters in the specified WordArt object are not all the same height.
msoTriStateMixed Not used with this property.
msoTriStateToggle Not used with this property.
msoTrue Characters in the specified WordArt object are all the same height.

expression.NormalizedHeight

expression   Required. An expression that returns one of the objects in the Applies To list.

Example

This example creates a new WordArt shape on the first page of the active publication and then sets each character in the shape to be the same height.

Sub SetNormalHeight()
    With ActiveDocument.Pages(1).Shapes.AddTextEffect _
            (PresetTextEffect:=msoTextEffect10, _
            text:="Test WordArt Shape", FontName:="Snap ITC", _
            FontSize:=30, FontBold:=msoFalse, FontItalic:=msoFalse, _
            Left:=36, Top:=36).TextEffect
        .NormalizedHeight = msoTrue
    End With
End Sub