从Access VBA创建PPT时对齐文本框

问题描述

在通过Access创建ppt时,我试图对齐文本框。可以从excel vba中使用对齐控件,但是我很难在访问中找到它。

这是从Access vba在Powerpoint中创建文本框的示例。我可以控制字体大小,但无法找到文本框的对齐方式。

tb_Title.TextFrame.TextRange.ParagraphFormat.Alignment = ppAlignCenter

唯一接近的是段落对齐,但是没有效果...

{{1}}

任何帮助……表示感谢,

解决方法

好伤心。我是在文字效果下找到的。

tb_SystemClass.TextEffect.Alignment = msoTextEffectAlignmentRight

,如果您希望从形状列表中选择文本框,则...

pptCurrentSlide.Shapes.Range("tb_SystemClass").TextEffect.Alignment = msoTextEffectAlignmentRight