How to set default zoom view upon start in MS Word

Word
‘Set custom view settings for existing documents when they are being opened
Public Sub AutoOpen()
    If Documents.Count >= 1 And ProtectedViewWindows.Count = 0 Then
        ‘Set number of columns
ActiveWindow.View.Zoom.PageColumns = 1
        ‘Set zoom
ActiveWindow.View.Zoom.Percentage = 100
        ‘Maximize window
        ActiveWindow.WindowState = wdWindowStateMaximize
    EndIf
End Sub
 
‘Set custom view settings for new documents
Public Sub AutoNew()
    If Documents.Count >= 1 And ProtectedViewWindows.Count = 0 Then
        ‘Set number of columns
ActiveWindow.View.Zoom.PageColumns = 1
        ‘Set zoom
ActiveWindow.View.Zoom.Percentage = 100
        ‘Maximize window
        ActiveWindow.WindowState = wdWindowStateMaximize
    EndIf
End Sub