将选定内容或指定范围内的正文折叠一个标题级别。
语法
expression。 CollapseOutline
( _Range_
)
expression 是必需的。 一个代表“View”对象的变量。
参数
名称 | 必需/可选 | 数据类型 | 说明 |
---|---|---|---|
Range | 可选 | Range object | 需要折叠的段落范围。 如果省略此参数,则折叠全部选定内容。 |
备注
如果文档未处于大纲或主控文档视图,将导致出错。
示例
本示例为活动文档的第二段设置"标题 2"样式,将活动窗口切换至大纲视图,并折叠第二段的正文。
ActiveDocument.Paragraphs(2).Style = wdStyleHeading2
With ActiveDocument.ActiveWindow.View
.Type = wdOutlineView
.CollapseOutline Range:=ActiveDocument.Paragraphs(2).Range
End With
本示例将文档中每个标题折叠一个级别。
With ActiveDocument.ActiveWindow.View
.Type = wdOutlineView
.CollapseOutline Range:=ActiveDocument.Content
End With
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。