Word VBA教程:ExpandOutline方法

将选定内容或指定范围内的正文展开一个标题级别。

注意   如果文档未处于大纲或主控文档视图,将导致出错。

expression.ExpandOutline(Range)

expression   必需。该表达式返回一个 View对象。

Range   Range对象类型,可选。指定展开的段落范围。如果省略此参数,则展开全部选定内容。

VBA示例

本示例将文档中每个标题展开一个级别。


With ActiveDocument.ActiveWindow.View
    .Type = wdOutlineView
    .ExpandOutline Range:=ActiveDocument.Content
End With

本示例展开 Document2 窗口中的活动段落。


With Windows("Document2")
    .Activate
    .View.Type = wdOutlineView
    .View.ExpandOutline
End With

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号