Maximize Visio Application Window 1

[ChuckUpNorth]

How do you maximize a Visio Application Window?

ActiveWindow.WindowState = visWSMaximized
maximizes the window within Visio,
but how do I maximize the application?

Thanks,
Chuck

 

[ChuckUpNorth]

NOTE: This was also posted in VBA forum

Visio doesn't seem to have WindowState for Application.
I got around the problem with the following code:

'==== Maximize visio application ====
Visio.Application.DoCmd (Visio.VisUICmds.visCmdAppMaximize)

'==== Maximize window within visio ====
Visio.ActiveWindow.WindowState = visWSMaximized