Maximize window when opening the workbook

[mrsesame]

When I open my .xlsm file in 2007 the application initially opens in a smaller window within the full view Excel window. It eventually opens full size after it runs through some VBA, but I would like it to open full size right from the get go. I am using the following code to open the file, but it does not fix this "lag" for lack of a better word.

Private Sub Workbook_Open()
Application.WindowState = xlMaximized