通过

ContentControlListEntry.MoveDown 方法 (Word)

  • 项目

将下拉列表或组合框内容控件中的项下移一项，以使它位于最初在它后面的某项之后。

语法

expression。 MoveDown

表达 返回 ContentControlListEntry 对象的表达式。

示例

以下示例下移第一项，以使它成为下拉列表或组合框内容控件中项列表的最后一项。

Dim objCC As ContentControl 
Dim objCL As ContentControlListEntry 
Dim intCount As Integer 
 
Set objCC = ActiveDocument.ContentControls.Item(3) 
 
If objCC.Type = wdContentControlComboBox Or _ 
 objCC.Type = wdContentControlDropdownList Then 
 
 Set objCL = objCC.DropdownListEntries.Item(1) 
 
 For intCount = 1 To objCC.DropdownListEntries.Count 
 objCL.MoveDown 
 Next 
 
End If

另请参阅

ContentControlListEntry 对象

支持和反馈

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