返回或设置一种现有样式,以根据此样式设置其他样式。指定基本样式的本地名称(一个整数或 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