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

質問

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 · ベストアンサー

下記のコマンドで。

Docmd.RunCommand acCmdAppMaximize

元に戻すときは、

Docmd.RunCommand acCmdAppRestore

お礼

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

回答No.1

bin-chan

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

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

お礼

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