CommandBarControls オブジェクト (Office)

コマンド バー上のコマンド バー コントロールを表す CommandBarControl オブジェクトのコレクション。

注:

[!メモ] 一部の Microsoft Office アプリケーションにおける CommandBars の使用方法が、Microsoft Office Fluent ユーザー インターフェイスの新しいリボン コンポーネントによって置き換えられました。 詳細については、「Office Fluent リボンの概要」を参照してください。

例

Controls プロパティを使用して、CommandBarControls コレクションを返します。 次の例では、ツールバー上の "Standard" という名前のすべてのコントロールのキャプションを、そのコントロールの [Id] プロパティの現在の値に変更します。

For Each ctl In CommandBars("Standard").Controls 
    ctl.Caption = CStr(ctl.Id) 
Next ctl

Add メソッドを使用して、新しいコマンド バー コントロールを CommandBarControls コレクションに追加します。 この例では、 カスタムという名前の新しい空白のボタンをコマンド バーに追加します。

Set myBlankBtn = CommandBars("Custom").Controls.Add

Controls(index) を使用して、コントロールのキャプションまたはインデックス番号を指定して、CommandBarControl、CommandBarButton、CommandBarComboBox、または CommandBarPopup オブジェクトを返します。 次の例では、コマンド バー "Standard" の最初のコントロールを "Custom" という名前のコマンド バーにコピーします。

Set myCustomBar = CommandBars("Custom") 
Set myControl = CommandBars("Standard").Controls(1) 
myControl.Copy Bar:=myCustomBar, Before:=1

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。

  • 最終更新: