Question

返回或设置一种现有样式，以根据此样式设置其他样式。指定基本样式的本地名称（一个整数或 WdBuiltinStyle 常量），或代表基本样式的对象，就可设置此属性。Variant 类型，可读写。

有关 WdBuiltinStyle 常量列表的内容，请参阅 Style 属性。

示例

本示例新建一篇文档，然后为其新添一个名为“myHeading”的段落样式，并以样式“标题 1”为新样式的基本样式。然后将新样式的左缩进量设置为 1 英寸（72 磅）。

Dim docNew As Document
Dim styleNew As Style

Set docNew = Documents.Add
Set styleNew = docNew.Styles.Add("NewHeading1")
With styleNew
 .BaseStyle = docNew.Styles(wdStyleHeading1)
 .ParagraphFormat.LeftIndent = 72
End With

本示例返回文档正文段落样式所用的基本样式。

Dim styleBase As Style

styleBase = ActiveDocument.Styles(wdStyleBodyText).BaseStyle
MsgBox styleBase