如果指定艺术字对象中的字符相对于该对象旋转了 90 度,则该值为 True。如果指定艺术字对象中的字符相对于该对象保持原有方向,则该值为 False。MsoTriState 类型,可读写。
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