コマンド バー コントロールの ID を取得するサンプル マクロ

文書翻訳 文書翻訳
文書番号: 162814
すべて展開する | すべて折りたたむ

目次

概要

CommandBar オブジェクトの Id プロパティには、一意な使用します。番号は各組み込みメニュー バー、ショートカット メニューのサブメニュー、メニュー項目、またはツールバー。コマンド上のコントロールを参照する場合、Id は必要です。バーです。マクロの例では、この資料では、Visual Basic for Applications を返す各種コマンド バー コントロールの Id。

詳細

詳細についてを表示するのには、次の資料番号をクリックして、資料は、マイクロソフト サポート技術。
159466[Xl97]: ボックスの一覧の組み込みのコマンド バー コントロールの ID 番号

Microsoft プログラミング例としてを提供するだけ、明示または黙示の保証もないです。などが含まれます黙示の保証の商品性または適合性の特定するには、目的。この資料では、プログラミングに精通している前提としています例示されている言語とツールを作成するために使用プロシージャをデバッグします。Microsoft サポート エンジニアお手伝いについて説明する、特定のプロシージャの機能が、これらが変わらない追加機能を提供するを満たすためには、プロシージャの作成例を要件を特定します。

メニュー バーのメニュー

次のマクロ使用例は、Id を返します、 ツール メニューの組み込み - グラフのメニュー バーにします。
   Sub File_Id

      Dim x as Object
      set x = CommandBars("Chart Menu Bar").Controls("Tools")
      MsgBox x.Caption & Chr(13) & x.Id

   End Sub
				

メニューのメニュー コマンド

次のマクロ例は Exit コマンドの Id を返しますで、 ファイル 組み込みワークシート メニュー バーのメニュー:
   Sub FileExit_Id()

      Dim x as Object
      set x = CommandBars("Worksheet Menu Bar").Controls("File") _
      .Controls("Exit")
      MsgBox x.Caption & Chr(13) & x.Id

   End Sub
				

コマンドをショートカット メニューのサブメニュー

次のマクロ例を集計値の Id を返しますアイテムのコマンドで、 数式 ピボット テーブルのサブメニューショートカット メニュー バー:
   Sub SubMenu_Command_Id()

      Dim x as Object
      set x = CommandBars("PivotTable Context Menu").Controls("Formulas") _
      .Controls("Calculated Item...")
      MsgBox x.Caption & Chr(13) & x.Id

   End Sub
				
次のマクロ例のすべてのアイテムの Id を返します、数式サブメニュー、ピボット テーブルのショートカット メニュー バー:
   Sub GetAll_Submenu_Ids()

      Dim ctrl as Object
      For Each ctrl in CommandBars("PivotTable Context Menu") _
      .Controls("Formulas").Controls
         MsgBox ctrl.Caption & Chr(13) & ctrl.Id
      Next ctrl

   End Sub
				

関連情報

プログラムでカスタマイズする方法の詳細についてはコマンド バー、Visual Basic のエディターで、クリックして、 オフィスアシスタント、タイプ メニューのカスタマイズをクリックして 検索、し、「概要」のコマンド バーを表示するのには

メモ Office アシスタントが表示されていない場合をクリックして、 オフィスアシスタント [標準] ツールバーのボタン。場合はマイクロソフトの Visual Basicヘルプがコンピューターにインストールされていない、次の資料を参照してください、技術情報:
120802 支社: は、1 つの Office アプリケーションまたはコンポーネントを追加または削除する方法

プロパティ

文書番号: 162814 - 最終更新日: 2011年7月4日 - リビジョン: 6.0
キーワード:?
kbhowto kbprogramming kbmt KB162814 KbMtja
機械翻訳の免責
重要: このサポート技術情報 (以下「KB」) は、翻訳者による翻訳の代わりに、マイクロソフト機械翻訳システムによって翻訳されたものです。マイクロソフトは、お客様に、マイクロソフトが提供している全ての KB を日本語でご利用いただけるように、翻訳者による翻訳 KB に加え機械翻訳 KB も提供しています。しかしながら、機械翻訳の品質は翻訳者による翻訳ほど十分ではありません。誤訳や、文法、言葉使い、その他、たとえば日本語を母国語としない方が日本語を話すときに間違えるようなミスを含んでいる可能性があります。マイクロソフトは、機械翻訳の品質、及び KB の内容の誤訳やお客様が KB を利用されたことによって生じた直接または間接的な問題や損害については、いかなる責任も負わないものとします。マイクロソフトは、機械翻訳システムの改善を継続的に行っています。
英語版 KB:162814
Microsoft Knowledge Base の免責: Microsoft Knowledge Baseに含まれている情報は、いかなる保証もない現状ベースで提供されるものです。Microsoft Corporation及びその関連会社は、市場性および特定の目的への適合性を含めて、明示的にも黙示的にも、一切の保証をいたしません。さらに、Microsoft Corporation及びその関連会社は、本文書に含まれている情報の使用及び使用結果につき、正確性、真実性等、いかなる表明・保証も行ないません。Microsoft Corporation、その関連会社及びこれらの権限ある代理人による口頭または書面による一切の情報提供またはアドバイスは、保証を意味するものではなく、かつ上記免責条項の範囲を狭めるものではありません。Microsoft Corporation、その関連会社 及びこれらの者の供給者は、直接的、間接的、偶発的、結果的損害、逸失利益、懲罰的損害、または特別損害を含む全ての損害に対して、状況のいかんを問わず一切責任を負いません。(Microsoft Corporation、その関連会社 またはこれらの者の供給者がかかる損害の発生可能性を了知している場合を含みます。) 結果的損害または偶発的損害に対する責任の免除または制限を認めていない地域においては、上記制限が適用されない場合があります。なお、本文書においては、文書の体裁上の都合により製品名の表記において商標登録表示、その他の商標表示を省略している場合がありますので、予めご了解ください。

フィードバック

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com