MENU
観光地にはお得なフリーパスあり

ワークシートサイズは常に最大化してエクセル画面を表示するVBA

広告
画面の操作
  1. ホーム
  2. エクセル
  3. 画面の操作
  4. ワークシートサイズは常に最大化してエクセル画面を表示するVBA
エクセル検索
エクセル
キーワード
HOMEUserForm印刷画面ファイル図形
日付・時刻データセル色関数VBA関数

エクセルファイルを開いたら中途半端なサイズで表示されるようになってしまった事ありませんか？

作業するのにはフルサイズでの画面最大化の方が良いので、VBAを使って自動的にフルサイズ表示させる方法をご紹介します。

WindowStateプロパティで最大化へ

このような中途半端にエクセルが開くと、わざわざ最大化するのが面倒ですよね。

エクセル中途半端な大きさ
エクセル中途半端な大きさ

エクセルファイルを開いたら常に最大化するように下記VBAコードを記述すれば解決です。

画面最大自動化VBA

エクセルを開くと自動的に最大化して表示させるには、WindowsStateプロパティを使い、ThisWorkbookにVBAコードを書きのように記載します。

UserForm2
コピペOK！

Private Sub Workbook_Open()
ActiveWindow.WindowState = xlMaximized
End Sub

解説
  1. エクセルファイルを開いたら
  2. 表示画面サイズを最大化する
  3. マクロ記述終了

これで、エクセルファイルを開いてマクロ有効化されていれば、常に画面は最大化されて表示されるようになります。

最小化・標準サイズ化の設定

WindowStateプロパティには、最大化以外にも最小化や標準サイズ化することもできるようになっていますので、先ほどは最大化のVBAコード「 ActiveWindow.WindowState = xlMaximized 」の部分「
xlMaximized 」（定数）を変更することで対応できます。

定数内容
xlMaximized最大化
xlMinimized最小化
xlNormal標準サイズ

最大化してセルの選択

実用例として、エクセルファイルを開いたら画面最大化はもちろんですが、特定のシートの特定のセルを指定して、常に同じところ（例えばSheet1のセルA1）が表示するようにして使っています。

コピペOK！

Private Sub Workbook_Open()
Worksheets(“MENU”).Range(“A1”).Select
ActiveWindow.WindowState = xlMaximized
End Sub

波乗りアヒル

たった1行追加でMENUという名のシートのセルA1を選択状態にして、ちゃんとエクセル最大化できます。

関連記事

どこかにビューーン
ちょっとの工夫で往復無料の時代が来た！！

新着ページ

もっと見る

よく見られているページ

大容量無料ファイル転送サービス【ACデータ】 無料イラスト【イラストAC】

フリーきっぷ TOP

紅葉スポット

もっと見る

2024年5月11日からマイルと楽天ポイントとの相互交換提携開始！

交換レート0.5：1なので半分になってしまいますが、使い方次第で実質3倍の価値まで引き上げられる方法です。

マイルの貯め方
画面の操作