【Excel VBA】ウィンドウのサイズを変更する（Width/Height）

前提

本記事でご紹介する、ウィンドウサイズの変更については、以下赤枠のサイズを変更する方法となります。

最大化や、最小化を実施したい場合は、以下の記事にて解説しています。

あわせて読みたい

【Excel VBA】ウィンドウの最大化/最小化（WindowState） ウィンドウを「最大化」及び「最小化」する方法を解説します。他にもウィンドウの状態を判定する方法や、全ウィンドウを最小化する方法も、コピペで使えるサンプルコードにして掲載。

基本情報

Widthプロパティ

ウィンドウの幅（横の長さ）を設定するには、WindowオブジェクトのWidthプロパティを使用します。
設定値には、ポイント単位の数値を指定します。

Heightプロパティ

ウィンドウの高さ（縦の長さ）を設定するには、WindowオブジェクトのHeightプロパティを使用します。
設定値には、ポイント単位の数値を指定します。

最大化や最小化されているウィンドウに対して、サイズ設定を行うとエラーが発生しますのでご注意ください。

サンプルコード

ウィンドウの幅と高さを設定する

Public Sub setWindowSize()

    ' Windowサイズの設定
    With ActiveWindow
        .WindowState = xlNormal ' 最大化や最小化の解除
        .Width = 1024           ' 幅を 1024 ポイントに設定
        .Height = 768           ' 高さを 768 ポイントに設定
    End With
End Sub

りゅう

「WindowState = xlNormal」を指定することで、エラー発生を抑止しています。

最後に

今回は、ウィンドウのサイズを設定する方法について解説しました。

本記事が、皆さんのお力になれば幸いです！