Word) (ContentControlListEntries 物件
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 方法來存取清單中的第三個項目並變更顯示文字。
注意事項
[!注意事項] 下列程式碼範例假設使用中文件內的第一個 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
請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。