Compartilhar via


Inserir um controle de conteúdo em um bloco de construção

Os blocos de construção e os controles de conteúdo são extremamente flexíveis. Você pode criar blocos de construção que contêm controles de conteúdo ou criar controles de conteúdo que usam blocos de construção para apresentar seleções de conteúdo rico para o usuário. Este tópico mostra como inserir um controle de conteúdo em um bloco de construção, os quais os usuários poderão então inserir em seus documentos.

Os objetos usados neste exemplo são:

O código a seguir insere um controle de conteúdo no documento ativo e, em seguida, adiciona o controle de conteúdo à coleção dos blocos de conteúdo no modelo anexado ao documento ativo.

Sub InsertContentControlIntoBuildingBlock() 
 Dim objCC As ContentControl 
 Dim objBB As BuildingBlock 
 Dim objTemplate As Template 
 Dim objRange As Range 
 
 Set objTemplate = ActiveDocument.AttachedTemplate 
 Set objCC = ActiveDocument.Range.ContentControls _ 
 .Add(wdContentControlComboBox) 
 
 objCC.DropdownListEntries.Add "Outstanding" 
 objCC.DropdownListEntries.Add "Good" 
 objCC.DropdownListEntries.Add "Fair" 
 
 Set objRange = ActiveDocument.Range 
 Set objBB = objTemplate.BuildingBlockEntries.Add("OGF Rating Scale", _ 
 wdTypeCustom1, "Ratings", objRange) 
End Sub

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.