Word) 字体对象 (
包含对象的字体属性(如字体名称、字号、颜色等)。
使用 Font 属性返回 Font 对象。 以下说明将粗体格式应用于所选内容。
Selection.Font.Bold = True
以下示例将活动文档中第一个段落的格式设置为 24 磅、Arial 和倾斜。
Set myRange = ActiveDocument.Paragraphs(1).Range
With myRange.Font
.Bold = True
.Name = "Arial"
.Size = 24
End With
以下示例将活动文档中“标题 2”样式的格式更改为 Arial 字体和加粗。
With ActiveDocument.Styles(wdStyleHeading2).Font
.Name = "Arial"
.Italic = True
End With
使用 New 关键字创建新的独立 Font 对象。 下例创建 Font 对象,设置一些格式化属性,然后将 Font 对象应用于活动文档的第一个段落。
Set myFont = New Font
myFont.Bold = True
myFont.Name = "Arial"
ActiveDocument.Paragraphs(1).Range.Font = myFont
还可以使用 Duplicate 属性复制 Font 对象。 下例使用所选内容的字符格式以及斜体格式创建新字符样式。 所选内容的格式未更改。
Set aFont = Selection.Font.Duplicate
aFont.Italic = True
ActiveDocument.Styles.Add(Name:="Italics", _
Type:=wdStyleTypeCharacter).Font = aFont
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。