返回介绍

PresetTextEffect 属性

发布于 2019-10-04 14:10:23 字数 1892 浏览 1005 评论 0 收藏 0

返回或设置指定艺术字的样式。此属性的值对应于“‘艺术字’库”对话框中的格式(自左而右,自上而下编号)。可读写。MsoPresetTextEffect 类型。

MsoPresetTextEffect 可以是下列 MsoPresetTextEffect 类型常数之一。
msoTextEffect1
msoTextEffect2
msoTextEffect3
msoTextEffect4
msoTextEffect5
msoTextEffect6
msoTextEffect7
msoTextEffect8
msoTextEffect9
msoTextEffect10
msoTextEffect11
msoTextEffect12
msoTextEffect13
msoTextEffect14
msoTextEffect15
msoTextEffect16
msoTextEffect17
msoTextEffect18
msoTextEffect19
msoTextEffect20
msoTextEffect21
msoTextEffect22
msoTextEffect23
msoTextEffect24
msoTextEffect25
msoTextEffect26
msoTextEffect27
msoTextEffect28
msoTextEffect29
msoTextEffect30
msoTextEffectMixed

expression.PresetTextEffect

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

说明

设置PresetTextEffect 属性会自动设置指定形状的许多其他格式属性。

示例

本示例将myDocument 中所有的艺术字设置为“‘艺术字’库”对话框中列出的第一种样式。

Set myDocument = ActivePresentation.Slides(1)
For Each s In myDocument.Shapes
 If s.Type = msoTextEffect Then
 s.TextEffect.PresetTextEffect = msoTextEffect1
 End If
Next

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。
列表为空,暂无数据
    我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
    原文