NormalizedHeight Property
Applies To
TextEffectFormat object.
Description
True if all characters (both uppercase and lowercase) in the specified WordArt are the same height. Read/write Long.
Example
This example adds WordArt that contains the text "Test Effect" to myDocument and gives the new WordArt the name "texteff1." The code then makes all characters in the shape named "texteff1" the same height.
Set myDocument = ActiveDocument
myDocument.Shapes.AddTextEffect(PresetTextEffect:=msoTextEffect1, _
Text:="Test Effect", FontName:="Courier New", FontSize:=44, _
FontBold:=True, FontItalic:=False, Left:=10, _
Top:=10).Name = "texteff1"
myDocument.Shapes("texteff1").TextEffect.NormalizedHeight = True