1.3 追加したメニューを削除する 右図のような、オリジナルのメニューを削除する方法です。個別に削除するときは、Application.CommandBars("Menu Bar")オブジェクトのControls(???).Deleteで行います。???の部分には、メニューの名前を指定します。 また、全てのオリジナルメニューを削除（ツールバーのリセットを）するときはApplication.CommandBars("Menu Bar").Resetで行います。 特定のメニューを削除する まずは、オリジナルのメニューから指定したメニューを選んで削除する方法です。 例では、オリジナルのメニュー「メニュー1」を削除しています。削除するときに指定したメニューがないときは実行時エラーが発生しますが、例ではメニューがあっても無くても処理が正常終了するように、On Errror…を使って（メニューがなかったときの）実行時エラーを回避しています。 Sub prcNewMenuDel()     On Error GoTo ErrHand     '指定したメニューを削除します。     '存在しない場合はエラーが出ますが、On Error…で回避してます。     With Application.CommandBars("Menu Bar")         .Controls("メニュー1").Delete     End With     Exit Sub ErrHand:     If Err.Number = 5 Then        Resume Next     Else        MsgBox Err.Description     End If End Sub 全てのオリジナルメニューを削除する 今度は、オリジナルのメニューを全て削除（ツールバーをリセットを）する方法です。オリジナルのメニューを全て削除を行うときは、Application.CommandBars("Menu Bar")の.Resetメソッドを実行します。 例では、追加したオリジナルメニューを全て削除しています。 Sub prcAllNewMenuDel()     Application.CommandBars("Menu Bar").Reset End Sub

[PR]管理人が書いたVBAプログラミング本 ■最速攻略 Access VBA サンプル大全集 ■Access クエリ スパテク209 ■ここが知りたかった! Access VBA 500の技※ ◆最速攻略 Excel VBA サンプル大全集 ◆苦手なコードもこれで安心!Excel VBA超入門講座 ◆Excel VBAゲーム大作戦 はじめて編※ 実践編※ （アマゾンへジャンプします。※は共著作品） Access VBA Tips+α メニューバー・ツールバー編 1.メニューバー    1.1 新しいメニューを追加する    ・CommandBar,CommandBarControl    ・Add、OnAction、Caption    ・VBAの処理を実行する方法    1.2 追加したメニューを変更する    ・Enabledプロパティで活性非活性を変更    ・ボタンの削除はDeleteメソッドで    1.3 追加したメニューを削除する    ・個別に削除するときはDeleteで    ・Resetでツールバーのリセット ■DAOデータアクセス編 ■ADOデータアクセス編 ■クエリー(SQL)編 ■フォーム・サブフォーム編 ■コントロール編 ■メニューバー・ツールバー編 ■マクロ（DoCmd）編 ■レポート編 ■応用テク・その他の機能編 ■プログラミングサンプル編 ■番外編1.HTTPやFTPを使うには Happy! Happy! Islandその他のコンテンツ ■VBAプログラミング、その他 　Access VBAプログラミング＆Tips 　Excel VBA(エクセルマクロ)プログラミング＆Tips 　VBScript＆JScriptプログラミング＆Tips for WSH 　プログラミング基礎・入門 　HTMLの書き方 ■ダウンロードコーナー 　AccessとExcelのフリーソフト ■コミュニティー 　VBA質問掲示板 ■その他 　オレの話を聞けぇ♪（仮称／コラム） 　管理人プロフィール 　管理人へメール ■別館(海外向けサイト) 　SAMURAI Game Center - Freeware games for Microsoft ACCESS and EXCEL! VBAプログラミング＆Tips集の "Happy! Happy! Island"トップページへ [リンク]IT関連情報サイトなど gihyo.jp 技術評論社提供のIT関連コンテンツサイト [リンク]一番クリックした国が優勝 ClickClickClick.com クリッカー＆認証人募集！日本を1位にしよう！もちろん、おいらも参加中！各種情報の入手はClickJapanオフィシャルサイトで。 [PR]証券会社・投資運用関連サイト カブドットコム証券 逆指値・W指値等の自動売買でリスク管理追求型の投資が可能！引け後のIRやニュースを見てからでも間に合う夜間取引も魅力！ マネックス証券 オンライントレード・自動売買の最先端！「逆指値・ツイン指値」でリスクコントロール！デイトレードなら片道手数料無料！ Ｅ＊トレード証券 オンライン専業証券�ｂPの口座数！業界最低水準の手数料体系と充実のサービスラインナップ！ 楽天証券のマーケットスピード ネット証券最強のトレーディングツール「マーケットスピード」でプロ水準の投資環境がご自宅のパソコンに！ オンライン証券徹底比較 価格．ｃｏｍで証券徹底比較！手数料、取引商品、信用取引金利、逆指値などの注文方法や提供情報などを徹底比較！

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