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.