VBA～ウィンドウの表示を最大化、最小化しよう～Excel

VBAでウィンドウの表示を最大化、最小化したい場合はWindow.WindowStateプロパティで設定できます。

最大化

下のコードを実行するとアクティブウィンドウが最大化します。

Sub test1()

ActiveWindow.WindowState = xlMaximized

End Sub

最小化

下のコードを実行するとアクティブウィンドウが最小化します。

Sub test2()

ActiveWindow.WindowState = xlMinimized

End Sub

ウィンドウの指定

Book1.xlsxというブックが開いた状態で下のコードを実行するとBook1.xlsxのウィンドウが最大化します。

Sub test3()

Windows("Book1.xlsx").WindowState = xlMaximized

End Sub