RotatedChars 属性 - Microsoft Excel Visual Basic 2002 参考

返回介绍

RotatedChars 属性

发布于 2019-08-07 字数 1735 浏览 827 评论 0

如果指定艺术字对象中的字符相对于该对象旋转了 90 度,则该值为 True。如果指定艺术字对象中的字符相对于该对象保持原有方向,则该值为 FalseMsoTriState 类型,可读写。







MsoTriState 可为以下 MsoTriState 常量之一。
msoCTrue
msoFalse 指定艺术字对象中的字符相对于该对象保持原有方向。
msoTriStateMixed
msoTriStateToggle
msoTrue 指定艺术字对象中的字符相对于该对象旋转 90 度。

expression.RotatedChars


expression 必需。该表达式返回“应用于”列表中的对象之一。


说明


如果艺术字对象中的文字是水平排列的,则将 RotatedChars 属性设置为 msoTrue 可使字符按逆时针方向旋转 90 度。如果艺术字对象中的文字是垂直排列的,则将 RotatedChars 属性设置为 msoFalse 可使字符按顺时针方向旋转 90 度。用 ToggleVerticalText 方法可使字符在水平和垂直排列方式之间转换。


Shape 对象的 Flip 方法和 Rotation 属性以及 TextEffectFormat 对象的 RotatedChars 属性和 ToggleVerticalText 方法都会影响艺术字对象中的字符方向和文本排列方向。可能需要进行尝试,以便适当地组合使用这些属性和方法,获得所需的效果。


示例


本示例向 myDocument 中添加艺术字对象,该对象中包含文字“Test”,然后使其中的字符按逆时针方向旋转 90 度。


Set myDocument = Worksheets(1)
Set newWordArt = myDocument.Shapes.AddTextEffect( _
PresetTextEffect:=msoTextEffect1, Text:="Test", _
FontName:="Arial Black", FontSize:=36, _
FontBold:=False, FontItalic:=False, Left:=10, _
Top:=10)
newWordArt.TextEffect.RotatedChars = msoTrue

上一篇:Root 属性

下一篇:Rotation 属性

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

支持 Markdown 语法,需要帮助?

目前还没有任何评论,快来抢沙发吧!