如果指定艺术字中 (大写和小写) 的所有字符的高度相同,则返回 msoTrue 。 读/写 MsoTriState。
语法
表达式。NormalizedHeight
表达 一个代表 TextEffectFormat 对象的变量。
示例
本示例将包含文本“测试效果”的艺术字添加到 myDocument ,并为新的艺术字命名为 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。