Home > 即効テクニック > Excel VBA > ウィンドウ操作関連のテクニック > ウィンドウサイズを固定する(EnableResizeプロパティ)

即効テクニック

ウィンドウ操作関連のテクニック

ウィンドウサイズを固定する(EnableResizeプロパティ)

(Excel 2000)
ウインドウサイズを固定して表示するように設定します。

●詳細●
このプロパティにFalseを設定すると、ウィンドウサイズの変更ができなくなります。
ただし、WindowStateプロパティにxlNomalが設定されているときにのみ有効です。その他の場合にはエラーとなります。

構文  Object.EnableResize     設定/取得

設定項目        内容
  Object        Windowオブジェクト [省略不可]

次のサンプルは、アクティブウィンドウのサイズを指定した大きさに固定します。
●サンプル●
Sub EnableResizeSamp1()

    With ActiveWindow
        .WindowState = xlNormal      '---通常表示に設定します。
        .Width = 200                 '---ウィンドウ幅を200に設定
        .Height = 200                '---ウィンドウの高さを200に設定
        .EnableResize = False        '---ウィンドウサイズ固定
    End With

End Sub
●注意●
EnableResizeプロパティの設定値は、ブックを閉じると破棄されます。ブックを開く度に設定しなおしてください。