一步操作配置Word环境

我们在开始编辑Word文档的时候，会发现有些事情我们总需要预先操作一下，比如100%普通视图、显示隐藏特殊标记、显示标尺、最大化窗口、显示导航窗格啥的，每次去操作，感觉很烦，那么通过下面这个宏代码可以一次搞定

 1 Sub InitWordEnv()
 2     VBA.SendKeys "% x"                                          '最大化窗口，无法被录制宏录制
 3     If ActiveWindow.View.SplitSpecial = wdPaneNone Then         '开启页面视图
 4         ActiveWindow.ActivePane.View.Type = wdPrintView
 5     Else
 6         ActiveWindow.View.Type = wdPrintView
 7     End If
 8     ActiveWindow.ActivePane.View.Zoom.Percentage = 100          '页面100%显示
 9     ActiveWindow.ActivePane.View.ShowAll = True                 '显示/隐藏编辑标记
10     ActiveWindow.ActivePane.DisplayRulers = True                '显示标尺
11     ActiveWindow.DocumentMap = True                             '显示导航窗格
12 End Sub