次の方法で共有


ContentControlListEntries オブジェクト (Word)

ContentControlListEntries コレクションには、ドロップダウン リストまたはコンボ ボックス コンテンツ コントロール内の項目を表す ContentControlListEntry オブジェクトが含まれています。

注釈

」ドロップ ダウン リスト ボックスまたはコンボ ボックスに項目を追加するのにには、 Add メソッドを使用します。 次のコード例では、新しいドロップダウン リスト コンテンツ コントロールにリスト項目を追加するのには、 Add メソッドを使用します。

Dim objCC As ContentControl Dim objLE As ContentControlListEntry Dim objMap As XMLMapping  Set objCC = ActiveDocument.ContentControls.Add(wdContentControlDropdownList)  'List items objCC.DropdownListEntries.Add "Cat" objCC.DropdownListEntries.Add "Dog" objCC.DropdownListEntries.Add "Equine" objCC.DropdownListEntries.Add "Monkey" objCC.DropdownListEntries.Add "Snake" objCC.DropdownListEntries.Add "Other"

コレクション内の個々のリスト アイテムにアクセスするには、ContentControl オブジェクトの Item メソッドまたは DropdownListEntries プロパティを使用します。 次のコード例は、Item メソッドを使用してリスト内の 3 番目の項目にアクセスし、その表示文字列を変更します。

注:

[!メモ] 次のコード例では、作業中の文書内の最初の ContentControl オブジェクトは、ドロップダウン リスト ボックスまたはコンボ ボックスであると仮定します。

Dim objCC As ContentControl Dim objLE As ContentControlListEntry Dim objMap As XMLMapping  Set objCC = ActiveDocument.ContentControls(1) Set objLE = objCC.DropdownListEntries.Item(3) objLE.Text = "Horse"

ドロップダウン リストまたはコンボ ボックスからすべての項目を削除するのにには、 Clear メソッドを使用します。 次のコード例では、作業中の文書の最初のコンテンツ コントロールからすべての項目をクリアします。

注:

[!メモ] 次のコード例では、作業中の文書の最初のコンテンツ コントロールがドロップダウン リストまたはコンボ ボックスであることを前提にしています。

Dim objCC As ContentControl  Set objCC = ActiveDocument.ContentControls(1)  objCC.DropdownListEntries.Clear

関連項目

Word オブジェクト モデル リファレンス

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

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