フォーム・レポート：メニューバーの非表示 Hit Counter

対象バージョン : 97, 2000, 2002, 2003
最終更新日 : 2005/04/25 （オリジナル作成日：1997/04/16）

概　要　

　フォームや、レポートで、メニューバーを完全に非表示にする方法です。

　

解　説

１．ユーザーメニューバーの作成
※このステップは、既に何かしらユーザーメニューバーを作成されていれば不要です。

(1) メニューバーを右クリックし、[ユーザー設定(C)...] で [新規作成(N)...] を選択し、"Blank"（都合の良い名前で可）と名前を入力し、[OK] を押下します。

(2) "Blank" を選択して、[プロパティ(P)] で "種類(N)" を "メニュー バー" に変更し、[閉じる] を押下します。

(3) "ツールバー(A)" タブの一覧から "Blank" のチェックを外します。

このまま、ユーザー設定を閉じます。

　

２．フォーム・レポートのデザイン

(1) "MenuBar/メニューバー" プロパティに、"Blank"（あるいは既にあるユーザーメニューバー）を指定します。

(2) フォームの場合

"OnOpen/開く時" のイベントプロシージャに、次のコードを入力します。

Private Sub Form_Open(Cancel As Integer)
DoCmd.ShowToolbar "Blank", acToolbarNo
End Sub

　既にあるユーザーメニューバーを利用した場合は、次のようになります。
Private Sub Form_Open(Cancel As Integer)
DoCmd.ShowToolbar "ユーザーメニューバーの名前", acToolbarNo
End Sub

(3) レポートの場合

"OnPage/ページフォーマット時" のイベントプロシージャに、次のコードを入力します。

Private Sub Report_Page()
DoCmd.ShowToolbar "Blank", acToolbarNo
End Sub

　既にあるユーザーメニューバーを利用した場合は、次のようになります。
Private Sub Report_Page()
DoCmd.ShowToolbar "ユーザーメニューバーの名前", acToolbarNo
End Sub

目次へ戻る