Styles 属性

该示例返回一个指定文档的 Styles 集合。只读。

有关返回集合中单个成员的内容，请参阅返回集合中的对象。

示例

本示例将活动文档中所有以“Chapter”开始的段落样式设置为“标题 1”。

For Each para In ActiveDocument.Paragraphs
    If para.Range.Words(1).Text = "Chapter " Then
        para.Style = ActiveDocument.Styles(wdStyleHeading1)
    End If
Next para

本示例打开活动文档所用的模板，并修改“标题 1”样式，然后保存模板，更新活动文档中所有的样式。

Set tempDoc = ActiveDocument.AttachedTemplate.OpenAsDocument
With tempDoc.Styles(wdStyleHeading1).Font
    .Name = "Arial"
    .Size = 16
End With
tempDoc.Close SaveChanges:=wdSaveChanges
ActiveDocument.UpdateStyles