EXCEL起動と同時にワークシートを最大化する方法

質問

EXCELの起動と同時にEXCEL本体とsheet1を最大化したいのですがどうしたら良いのでしょうか？

本体の方は
Application.WindowState = xlMaximized
でいいと思うのですがsheet1の最大化が分かりません。

回答No.2

taocat · ベストアンサー

こんにちは。

殆どのコードはマクロ記録をとってみれば分かりますよ。(^^;;

WorkBook のOpenイベントに次のコードをセット

-----------------------------------------------
Private Sub Workbook_Open()

Application.WindowState = xlMaximized

Sheets("Sheet1").Select

ActiveWindow.WindowState = xlMaximized

End Sub
-----------------------------------------------

以上です。

お礼

Sheets("Sheet1").Select
ActiveWindow.WindowState = xlMaximized

で解決しました。ありがとうございました。

回答No.4

zap35

＃０１さんも書かれたようにアクティブなシートの最大化と考えて
ActiveWindow.WindowState = xlMaximized
で良いと思いますが、開いたシートで　sheet1　が先頭でない場合は
　　sheets("sheet1").activate
も必要でしょう

回答No.3

taocat

あぁぁぁ～、被ってるよぅ。。。。

merlionXXさん、すみませぬ。。。(^^;;;

回答No.1

merlionXX

ActiveWindow.WindowState = xlMaximized
でどうでしょうか？

お礼

ありがとうございました。