Excel VBA ウインドウの大きさを最大化、縮小化、標準にする-WindowState

Excelのウインドウの大きさをVBAで最大化したり、最小化したり、標準にしたりする記録です。

下図は、Excel2016です。

< スポンサーリンク >

構文

Windowオブジェクト.WindowState

ウインドウの状態をxlwindowstateで返す または 設定します。

【xlwindowstate】

例

ウインドウの大きさを最大化します。

Sub test()
    ActiveWindow.WindowState = xlMaximized
End Sub

ウインドウの大きさを最小化します。

Sub test()
    ActiveWindow.WindowState = xlMinimized
End Sub

ウインドウの大きさを標準します。

Sub test()
    ActiveWindow.WindowState = xlNormal
End Sub

ウインドウの大きさが標準だったら最大化します。

Sub test()
    With ActiveWindow
        If .WindowState = xlNormal Then
            .WindowState = xlMaximized
        End If
    End With
End Sub

< スポンサーリンク >※広告先のお問い合わせは広告主様にお願いします