返回指定样式的说明。例如,“标题 2”样式的典型说明将是:“正文+字体:Arial、12 磅、加粗、倾斜、段前 12 磅、段后 3 磅、与下段同页、2 级”。String 类型,只读。
本示例新建一篇文档并插入以制表符分隔的列表,以显示活动文档中的样式及其说明。
Dim docActive As Document
Dim docNew As Document
Dim styleLoop As Style
Set docActive = ActiveDocument
Set docNew = Documents.Add
For Each styleLoop In docActive.Styles
With docNew.Range
.InsertAfter Text:=styleLoop.NameLocal & Chr(9) _
& styleLoop.Description
.InsertParagraphAfter
End With
Next styleLoop