ウィンドウ 位置 サイズ 状態 Application.Top Left Width Height WidowsState
Sub ウィンドウ位置サイズ状態() With Application MsgBox "Top:" & .Top & Chr(13) & _ " Left:" & .Left & Chr(13) & _ " Width:" & .Width & Chr(13) & _ " Height:" & .Height & Chr(13) & _ " WindowState:" & .WindowState End With End Sub
参考:ウィンドウ位置
参考:ウィンドウサイズ
WindowState:ウィンドウの状態
※最大化/最小化の状態で位置サイズを設定を設定するとエラーになるので、xlNormalを設定してから位置サイズを変更
定数 値 内容
xlMaximized -4137 最大化
xlMinimized -4140 最小化
xlNormal -4143 標準
参考:WindowState