Font.Bold 属性 (Publisher)

返回或设置一个 MsoTriState 常量,该常量代表文本区域中字符的 Bold 属性的状态。 读/写。

语法

表达式大胆

表达 一个代表 Font 对象的变量。

返回值

MsoTriState

备注

加粗 属性值可以是在 Microsoft Office 类型库中声明以下 MsoTriState 常量之一。

常量 说明
msoFalse 该范围中的所有字符都不设置为粗体格式。
msoTriStateMixed 一个返回值,该值指示区域包含一些格式化为粗体的文本和一些未设置为粗体格式的文本。
msoTriStateToggle msoTrue 和 msoFalse 之间切换的设置值。
msoTrue 该范围中的所有字符都设置为粗体格式。

示例

本示例测试当前出版物的第二篇文章中的所有文本,如果它同时包含加粗文本和不加粗文本,则会将所有文本设置为加粗。 如果文本全部加粗或全部不加粗,则会显示一条消息,告知用户没有混合加粗。 为了使此代码能正确执行,当前出版物中必须有两个或更多包含文字的文章。

Sub BoldStory() 
 
 Dim stf As Publisher.Font 
 
 Set stf = Application.ActiveDocument.Stories(2).TextRange.Font 
 With stf 
 If .Bold = msoTriStateMixed Then 
 .Bold = msoTrue 
 Else 
 MsgBox "Mixed bolding is not in this story." 
 End If 
 End With 
 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。