ａｃｃｅｓｓ アプリケーションの最大化をしたい

Ofiice２００７を使っています。

エクセルなら
Sub test()
Application.WindowState = xlMaximized
End Sub

で最大化できますが、アクセスで同じコードを実行するとエラーになります。

Application.WindowState = acMaximized
にしてもダメでした。

オブジェクトブラウザで検索したところ
WindowStateもacMaximizedもアクセスにはないようです。

ヘルプでWindowStateを検索したところ、
WindowState プロパティと言うのを見つけました。

内容は、
↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓
ウィンドウの表示状態を指定する数値を設定します。値の取得も可能です。

設定値

WindowState プロパティの設定値は、次のとおりです。

定数 　　　　　　　　　　値　　　　　　　　　　　　　　　　　 内容
vbext_ws_Normal 　　　0 　　(既定値) 　　　　　ノーマル
vbext_ws_Min　　　　　 1 　　　 最小化 　　　　　　(タスクバーに縮小表示)
vbext_ws_Max 　　　　　2 　　　最大化 　　　　　　(画面全体に拡大表示)
↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑

とのことですが、どうやって使えば良いでしょう？

Sub test()
Application.WindowState = vbext_ws_Max
End Sub

だとダメでした。
ご教授よろしくお願いします。

No.2 ベストアンサー 回答者： hatena1989 回答日時： 2012/10/01 01:37

下記のコマンドで。

Docmd.RunCommand acCmdAppMaximize

元に戻すときは、

Docmd.RunCommand acCmdAppRestore

この回答へのお礼

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

お礼日時：2012/10/25 19:58

No.1 回答者： bin-chan 回答日時： 2012/09/30 22:47

今、ACCESSを使える環境でないのですが。

画像の中に「使用例」がありますが、クリックするとどうなります？

この回答へのお礼

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

お礼日時：2012/10/25 19:58