Excel VisualBasic Script

Private Sub Workbook_Activate()
    ActiveWindow.WindowState = xlMaximized
End Sub