CommandBarControls オブジェクト (Office)
コマンド バーのコマンド バー コントロールを表す CommandBarControl オブジェクトのコレクション。
注:
[!メモ] 一部の Microsoft Office アプリケーションにおける CommandBars の使用方法が、Microsoft Office Fluent ユーザー インターフェイスの新しいリボン コンポーネントによって置き換えられました。 詳細については、「Office Fluent リボンの概要」を参照してください。
例
CommandBarControls コレクションを取得するには、Controls プロパティを使用します。 次の例では、 Standard という名前のツール バーのすべてのコントロールのキャプションを、そのコントロールの Id プロパティの現在の値に変更します。
For Each ctl In CommandBars("Standard").Controls
ctl.Caption = CStr(ctl.Id)
Next ctl
新しいコマンド バー コントロールを CommandBarControls コレクションに追加するには、 Add メソッドを使用します。 次の使用例は、Custom という名前のコマンド バーに新しい空白のボタンを追加 します。
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 のサポートおよびフィードバックを参照してください。