エクセル95のマクロで自動的に全画面表示したい

エクセル95のマクロで質問です。
エクセルのファイルを開いた時、自動的に全画面表示にするには
Sub Auto_Open()
Application.DisplayFullScreen = True
End Sub
で、立ち上げた時自動的に全画面表示になりますよね。
これを最小化したい場合、このシート上に最小化ボタンをつけて
Sub Macro1()
Application.WindowState = xlMinimized
End Sub
というマクロを登録して最小化して、下のツールバーにアイコン化しました。
この場合ですが、次に、ツールバーのエクセルのアイコンをクリックしたとき、エクセル画面は全画面ではなくノーマルなものになってしまいます。
これを自動的に全画面表示にする場合はどうすればいいのでしょうか？

No.3 回答者： kazuhiko5681 回答日時： 2002/11/04 14:23

初めまして。

自信がないのですが、私の参考書に書いてあったマクロを提供します。お試しになってみて下さい。

Sub Auto_Activate

With activewindow
.windowstate = slnormal
.top = 0
.left = 0
.height = application.usableheight
.width = application.usablewidth
end with

end sub

この回答へのお礼

ありがとうございました。
残念ながら動きませんでした。
思うに、ツールバーのエクセルアイコンをクリックしただけではアクティブにならないのではないでしょうか？

お礼日時：2002/11/04 21:06

No.2 回答者： taisuke555 回答日時： 2002/11/04 13:51

すいません。

手元にExcel95も、資料もないので確認することができません。

他の回答を待ってみてください。
何かわかりしだい回答します。

役に立たず申し訳ありません。

No.1 回答者： taisuke555 回答日時： 2002/11/04 13:03

未確認ですが、

SUb Auto_Activate()
Application.DisplayFullScreen = True
End Sub

Auto_Activate（アクティブになった時に自動で実行するマクロ）
というのがありませんでしたっけ？
間違えていたらすみません。なければ補足してください。もっとよく調べてみます。

この回答への補足

早速ありがとうございます。
やってみましたが反応しませんでした。
自動実行をヘルプで調べると、Auto_Open、Auto_Close、Auto_Activate、Auto_Deactivate があるようなのですが。

補足日時：2002/11/04 13:16