返回介绍

Grow 方法

发布于 2019-09-29 09:56:01 字数 630 浏览 1226 评论 0 收藏 0

将字号增加为下一个有效字体大小。如果选定内容或区域包含有不止一种字号,则每一种字号分别增加为下一个有效字体大小。

expression.Grow

expression 必需。该表达式返回一个 Font 对象。

示例

本示例增加新文档第四个单词的字号。

Dim rngTemp As Range

Set rngTemp = Documents.Add.Content
rngTemp.InsertAfter "This is a test of the Grow method."
MsgBox "Click OK to increase the font size of the fourth word."
rngTemp.Words(4).Font.Grow

本示例增加选定文本的字体大小。

If Selection.Type = wdSelectionNormal Then 
 Selection.Font.Grow
Else
 MsgBox "You need to select some text."
End If

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

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

发布评论

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