Help, in modifying VBA to maximize my active window using button.

[lbillie]

I click on my button to open a file then it minimizes the file, I would also like the active screen I was currently working on to maximize instead of partially showing up in my window. This is the macros I'm currently using. Need help in modifying it the VBA to maximize the active workbook. Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Workbooks.Open "P:\Procedures\Product Outlines\DRIVE\DRIVE_LINKS\DRIVE_PICS.xls"
ActiveWindow.WindowState = xlMinimized
Application.ScreenUpdating = True

End Sub

 

[Andrew Poulsom]

Wouldn't:

ActiveWindow.WindowState = xlMaximized

do the job?

 

[lbillie]

I tried that, it maximized the file I wanted to minimize. I would like to maximize the file with the macro button. It retrieves the pictures from the minimized file. While clicking on some checkbox selection, pictures would auto populate. I tried this too: Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Workbooks.Open "P:\Procedures\Product Outlines\DRIVE\DRIVE_LINKS\DRIVE_PICS.xls"
ActiveWindow.WindowState = xlMinimized
Application.ScreenUpdating = xlMaximized

End Sub

 

[Andrew Poulsom]

Does this not work for you?

Private Sub CommandButton1_Click()
    Application.ScreenUpdating = False
    Workbooks.Open Filename:="P:\Procedures\Product Outlines\DRIVE\DRIVE_LINKS\DRIVE_PICS.xls"
    ActiveWindow.WindowState = xlMinimized
    ActiveWindow.WindowState = xlMaximized
    Application.ScreenUpdating = True
End Sub

 

[lbillie]

Thank you!!! It works! I really appreciate it!!!!