共用方式為

Word) (ContentControls.Add 方法

  • 發行項

會將指定類型的新內容控制項新增至使用中文件，並會傳回代表新內容控制項的 ContentControl 物件。

語法

運算式。新增 (類型、 範圍)

表達 會傳回 ContentControls 物件的 運算式。

參數

名稱 必要/選用 資料類型 描述
Type 選用 WdContentControlType 會指定要插入使用中文件的內容控制項類型。 如果省略此參數，Microsoft Word 會插入 RTF 內容控制項。
Range 選用 Variant 會指定要在其中放置內容控制項的使用中文件。 如果省略此參數，Word 就會將內容控制項放置於插入點的位置或取代目前的選取範圍。

傳回值

ContentControl

註解

您只能在 RTF 內容控制項、建置區塊庫內容控制項及群組內容控制項中巢狀化內容控制項。 如果插入點或目前的選取範圍位於不同類型的內容控制項內部，這個方法就會引發錯誤。 在此情況下，您可以移動插入點或使用 Range 參數來指定文件中的位置。

範例

下列範例會建立新的下拉式清單內容控制項，並將許多項目加入至此清單。

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"

另請參閱

ContentControls 集合

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。