WindowState

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

下図は、Excel2016です。

 

< スポンサーリンク >



 

構文

Windowオブジェクト.WindowState

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

【xlwindowstate】

名前説明
xlMaximized -4137 最大化
xlMinimized -4140 最小化
xlNormal -4143 標準

 

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

Sub test()
    ActiveWindow.WindowState = xlMaximized
End Sub

WindowState

 

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

Sub test()
    ActiveWindow.WindowState = xlMinimized
End Sub

WindowState

 

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

Sub test()
    ActiveWindow.WindowState = xlNormal
End Sub

WindowState

 

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

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

WindowState

 

< スポンサーリンク >