フォーム・レポート:ツールバーの非表示 |
対象バージョン : 97, 2000, 2002, 2003
最終更新日 : 2005/04/25
(オリジナル作成日:1997/10/29)
概 要
フォームや、レポートで、ツールバーを非表示にする方法です。
解 説
1.ユーザーツールバーの作成
※このステップは、既に何かしらユーザーツールバーを作成されていれば不要です。
(1) メニューバーを右クリックし、[ユーザー設定(C)...]
で [新規作成(N)...] を選択し、"Blank"(都合の良い名前で可)と名前を入力し、[OK]
を押下します。
(2) "ツールバー(A)" タブの一覧から
"Blank" のチェックを外します。
このまま、ユーザー設定を閉じます。
2.フォーム・レポートのデザイン
(1) "Toolbar/ツールバー" プロパティに、"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