PowerPoint VBA教程:RotatedChars属性

决定是否将指定艺术字中的字符相对于艺术字边框形状旋转 90 度。可读写。MsoTriState 类型。

MsoTriState 可以是下列 MsoTriState 类型常数之一。
msoCTrue
msoFalse 指定艺术字中的字符保留原有的相对于边框形状的方向。
msoTriStateMixed
msoTriStateToggle
msoTrue 将指定艺术字中的字符相对于艺术字边框形状旋转 90 度。

说明

如果艺术字中含有水平文字,将 RotatedChars属性设置为 msoTrue 可将该字符逆时针旋转 90 度。如果艺术字中含有垂直文字,将 RotatedChars属性设置为 msoFalse 可将该字符顺时针旋转 90 度。使用 ToggleVerticalText方法在水平文字流和垂直文字流之间切换。

Shape对象的Flip方法和Rotation属性以及 TextEffectFormat对象的 RotatedChars属性 和ToggleVerticalText方法都影响代表艺术字的 Shape对象中文本流的字符方向。您可能需要多次试验,才能找出如何组合这些属性和方法的效果获得预期结果。

VBA示例

本例向myDocument 中添加带有“Test”文本的艺术字,并将该字符逆时针旋转 90 度。


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

上页:PowerPoint VBA教程:Root属性 下页:PowerPoint VBA教程:Rotation属性

PowerPoint VBA教程:RotatedChars属性

PowerPoint VBA教程:Rotation属性 PowerPoint VBA教程:RotationEffect属性
PowerPoint VBA教程:RotationX属性 PowerPoint VBA教程:RotationY属性
PowerPoint VBA教程:Rows属性 PowerPoint VBA教程:Ruler属性
PowerPoint VBA教程:Run属性 PowerPoint VBA教程:Saved属性
PowerPoint VBA教程:SaveNewWebPagesAsWebArchives属性 PowerPoint VBA教程:ScaleEffect属性
PowerPoint VBA教程:SchemeColor属性 PowerPoint VBA教程:ScreenSize属性
PowerPoint VBA教程:ScreenTip属性 PowerPoint VBA教程:Script属性
PowerPoint VBA教程:Scripts属性 PowerPoint VBA教程:SegmentType属性
PowerPoint VBA教程:Selected属性 PowerPoint VBA教程:Selection属性
PowerPoint VBA教程:Shadow属性 PowerPoint VBA教程:Shape属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号