通过

Word) (Range.ContentControls 属性

  • 项目

返回一个 ContentControls 集合，该集合代表范围中包含的内容控件。 此为只读属性。

语法

expression。 ContentControls

expression：一个返回 Range 对象的表达式。

示例

下面的示例将一个下拉列表内容控件插入到活动文档中的指定位置。

Dim objCC As ContentControl 
Dim objRange as Range 
 
Set objRange = ActiveDocument.Range(200, 200) 
Set objCC = objRange.ContentControls.Add(wdContentControlDropdownList) 
 
'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"

另请参阅

Range 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。