ContentControls.Add Method (Word)
Adds a new content control, of the type specified, into the active document and returns a ContentControl object that represents the new content control.
Syntax
expression .Add(Type, Range)
expression An expression that returns a ContentControls object.
Parameters
Name |
Required/Optional |
Data Type |
Description |
|---|---|---|---|
Type |
Optional |
Specifies the type of content control to insert into the active document. If omitted, Microsoft Word inserts a rich-text content control. |
|
Range |
Optional |
Variant |
Specifies where in the active document to place the content control. If omitted, Word places the content control at the position of the insertion point or replaces the current selection. |
Return Value
ContentControl
Remarks
You can nest content controls only within rich-text content controls, building block gallery content controls, and group content controls. If the insertion point or current selection is inside a content control of a different type, this method raises an error. In this case, you can either move the insertion point or use the Range parameter to specify a location within the document.
Example
The following example creates a new drop-down list content control and adds several items to the list.
Dim objCC As ContentControl
Set objCC = ActiveDocument.ContentControls.Add(wdContentControlDropdownList)
objCC.Title = "My Favorite Animal"
If objCC.ShowingPlaceholderText Then _
objCC.SetPlaceholderText , , "Select your favorite animal "
'List entries
objCC.DropdownListEntries.Add "Cat"
objCC.DropdownListEntries.Add "Dog"
objCC.DropdownListEntries.Add "Horse"
objCC.DropdownListEntries.Add "Monkey"
objCC.DropdownListEntries.Add "Snake"
objCC.DropdownListEntries.Add "Other"