我想要将特定文件置于 Web 布局视图中。因此我在Document_Open
子程序中使用了以下 VBA 语句。
ActiveWindow.View.Type = wdWebView
但这里的问题是我打开的下一个文件也会在 Web 视图中打开。
没有 VBA 我该怎么做?有可用的选项吗?
答案1
您可以使用解决方法并简单地为您的 Normal.dotm 文件设置一个视图,如这视频。
因此,您需要在 Sub 中插入类似以下内容AutoOpen()
:
Public Sub AutoOpen()
If Documents.Count >= 1 And ProtectedViewWindows.Count = 0 Then
ActiveWindow.View.Type = wdPrintView
‘Set number of columns
ActiveWindow.View.Zoom.PageColumns = 1
‘Set zoom
ActiveWindow.View.Zoom.Percentage = 100
‘Maximize window
ActiveWindow.WindowState = wdWindowStateMaximize
EndIf
End Sub
该If Documents.Count >= 1 And ProtectedViewWindows.Count = 0 Then
部分只是确保如果您在保护模式下打开文件,代码将不会执行,因为这会引发错误。