Свойство TextEffectFormat.NormalizedHeight (Excel)
Возвращает msoTrue, если все символы (как в верхнем, так и в нижнем регистре) в указанном объекте WordArt имеют одинаковую высоту. Чтение и запись MsoTriState.
Синтаксис
expression. NormalizedHeight
Выражение Переменная, представляющая объект TextEffectFormat .
Пример
В этом примере объект WordArt, содержащий текст Test Effect, добавляется в myDocument и присваивает новому объекту WordArt имя texteff1. Затем код делает все символы в фигуре с именем texteff1 одинаковой высоты.
Set myDocument = Worksheets(1)
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 = msoTrue
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.