エクセルファイルを開いたら必ず画面表示を最大化するVBA

画面サイズ最大化VBA

毎回ではないのですが、パソコンを共用で使用していると何故か中途半端な大きさでエクセルファイル開くことあり、その度に画面を最大化させるのって面倒だと思いませんか?

そんなわずかな手間ですが、VBAコード1行追加で解放されて常に画面最大化表示してくれる便利機能で、中途半端な画面サイズで表示されることから解放されますよ。

目次

WindowStateプロパティ

ウィンドウの大きさを最小化するか、最大化するか、元のサイズに(標準)戻すかを指定させるのにWindowStateプロパティを使用します。

内容定数
最大化xlMaximized
最小化xlNinimized
標準xlNormal

使い方としては一般的にエクセルファイルが開いた時にサイズ指定を行うので、ThisWorkbookにOpenイベントとしてVBAコードを記載します。

画面最大化VBA

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

解説
  1. エクセルファイルが開いたら下記処理をする
  2. ウィンドウの状態を最大化する
  3. マクロ記録終了

たった1行記述するだけで、こんな中途半端な表示が・・・

ちょっと極端な例かな
ちょっと極端な例かな

いつも最大化されて表示されるので、最大化クリックする手間から解放されました。

最大化
普通は画面いっぱいの最大化して使いますよね

もし、共有パソコンを利用して中途半端な画面表示が続くのであれば、この方法で簡単に画面最大化できるので試してみてはいかがですか?

目次