DoCmd.SelectObject(ウィンドウを最前面に表示する)
Accessの中に開いている各種ウィンドウを最前面に表示するには、DoCmd.SelectObjectを使います。データベースウィンドウを選択することもできます。
DoCmd.Minimizeの書式
DoCmd.SelectObject ObjectType, ObjectName, InDatabaseWindow
■ObjectType/オブジェクト種類(必須)
オブジェクトの種類を@の引数で指定します。

■ObjectName/オブジェクト名(省略可能)
フォーム名やレポート名など、最前面に表示するオブジェクト名を指定します。ObjectTypeで指定した種類と異なっている場合は実行時エラーが発生します。

■InDatabaseWindow/データベースウィンドウ(省略可能)
フォーム名やレポート名など、最前面に表示するオブジェクト名を指定します。

 @ObjectType(オブジェクト種類)に指定する定数
acDataAccessPage データアクセスページ
acDefault 指定できません。
acDiagram ダイアグラム
acForm フォーム
acFunction 関数
acMacro マクロ
acModule モジュール
acQuery クエリー
acReport レポート
acServerView サーバービュー
acStoredProcedure ストアドプロシージャ
acTable テーブル
DoCmd.SelectObjectの使用例
次の例は、「フォーム1」を最前面に表示し、さらに最小化する例です。Docmd.SelectObjectで最前面に表示した後、DoCmd.Minimizeで最小化しています。

なお、フォーム1を開いていないときは実行時エラーが発生します。

sub s_DoCmd_SelectObject_Sample()

    'フォーム1を最前面に表示します
    DoCmd.SelectObject acForm, "フォーム1"

    'フォームを最小化します
    DoCmd.Minimize

End Sub
Copyright(C) 1999-2006 結城圭介。 All rights reserved