Open Event Example

This example maximizes Microsoft Excel whenever the workbook is opened.

Private Sub Workbook_Open()
    Application.WindowState = xlMaximized
End Sub