CommandBarComboBox.AddItem メソッド (Office)
指定したコマンド バー コンボ ボックス コントロールにリスト 項目を追加します。 コンボ ボックス コントロールは、ユーザー設定のドロップダウン リスト ボックスまたはコンボ ボックスのいずれかでなければなりません。
注:
[!メモ] 一部の Microsoft Office アプリケーションにおける CommandBars の使用方法が、Microsoft Office Fluent ユーザー インターフェイスの新しいリボン コンポーネントによって置き換えられました。 詳細については、「Office Fluent リボンの概要」を参照してください。
構文
式。AddItem (Text, Index)
式CommandBarComboBox オブジェクトを表す変数。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
テキスト | 必須 | String | 指定したコントロールに追加する項目を指定します。 |
インデックス | 省略可能 | バリアント型 | リスト内の項目の位置です。 この引数を省略すると、項目は一覧の最後に追加されます。 |
例
次の使用例は、"ユーザー設定" というコマンド バーにコンボ ボックス コントロールを追加した後、コンボ ボックスのリストに 2 つの項目を追加します。 また、コンボ ボックスのリストの行数 (一度に表示される項目数)、幅、および空白の既定値を設定します。
Set myBar = CommandBars("Custom")
Set myControl = myBar.Controls.Add(Type:=msoControlComboBox, Id:=1)
With myControl
.AddItem "First Item", 1
.AddItem "Second Item", 2
.DropDownLines = 3
.DropDownWidth = 75
.ListHeaderCount = 0
End With
注:
このメソッドをエディット ボックスまたは組み込みのコンボ ボックス コントロールに設定すると、エラーが発生します。
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。
フィードバック
https://aka.ms/ContentUserFeedback」を参照してください。
以下は間もなく提供いたします。2024 年を通じて、コンテンツのフィードバック メカニズムとして GitHub の issue を段階的に廃止し、新しいフィードバック システムに置き換えます。 詳細については、「フィードバックの送信と表示