Word 2007文档结构图 大纲视图 目录默认折叠收缩

Word的大纲视图/文档结构图，打开的时候默认所有层级全部展开，一旦文档非常长，看起来就别扭，半天找不到东西。这里就设置它默认全部折叠，也就是只显示一级目录。实现原理就是建立一个word自动执行的宏（不仅仅是Excel才有宏）。看图就好。

注：Word2013中该方法不再有效，可以左边导航栏通过鼠标右击方式选择收缩或者展开，以及显示的标题层级；也可以通过如下快捷键方式来设定：

文件--》选项--》自定义功能区--》键盘快捷方式：自定义--》类别中选择 所有命令--》命令中选择 CollapseAllHeading--》请按新快捷键--》设定快捷键--》指定，关闭

1. 首先启用”开发工具“，默认是没启用的



2. 建立宏

    a) 首先输入宏名称，注意必须是AutoOpen，其他名字则不会自动执行，然后编辑（红色标示）

    b) 如果后面想单独手动执行，那么同样步骤进来选中这个宏，然后点击运行即可（黑色标示）



3. 编辑宏

    a) 进来之后默认生成如下内容

Sub AutoOpen()
'
' AutoOpen 宏
'
'

End Sub

    b) 如下一样插入一句 ActiveWindow.View.ShowHeading 1，表示活动窗口的视图Heading（层级）为1，也即是一级目录/标题



    如果想要一次性展开全部，以此类推，写个新的sub，ActiveWindow.View.ShowHeading 9使用9级，然后按需执行这个过程就OK。

    c) 有很多视图，比如打开word文档默认就进入大纲视图，那么把 ActiveWindow.View.Type = wdOutlineView 前面的单引号去掉即可；附上其他视图选项。