Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Возвращает 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 и обратная связь.