我们在开始编辑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