将文本区域中的文本方向设置为从右向左阅读。
expression.RtlRun
expression 必选。该表达式返回一个 TextRange 对象。
此方法使得可以在同一个演示文稿中使用从左向右和从右向左两种语言的文字。
下面的示例查找第一张幻灯片中所有包含文本的形状,并将文本更改为从右向左阅读方式。
ActiveWindow.ViewType = ppViewSlide
For Each sh In ActivePresentation.Slides(1).Shapes
If sh.HasTextFrame Then
sh.TextFrame.TextRange.RtlRun
End If
Next