Ler em inglês

Compartilhar via


Objeto DropDown (Word)

Representa um campo de formulário suspenso que contém uma lista dos itens do formulário.

Comentários

Use FormFields (index), em que o índice é o número do índice ou o nome do indicador associado ao campo de formulário suspenso, para retornar um único objeto FormField . Usar o menu suspenso propriedade com o objeto FormField para retornar um objeto DropDown. O exemplo a seguir seleciona o primeiro item do campo de formulário suspenso chamado "DropDown" do documento ativo.

ActiveDocument.FormFields("DropDown1").DropDown.Value = 1

O número de índice representa a posição do campo de formulário no FormFields coleção. O exemplo a seguir verifica o tipo do primeiro campo de formulário no documento ativo. Se houver um campo de formulário suspenso, o segundo item será selecionado.

If ActiveDocument.FormFields(1).Type = wdFieldFormDropDown Then 
 ActiveDocument.FormFields(1).DropDown.Value = 2 
End If

O exemplo a seguir determina se o campo de formulário representado por ffield é um campo de formulário suspenso válido antes de adicionar um item a ele.

Set ffield = ActiveDocument.FormFields(1).DropDown 
If ffield.Valid = True Then 
 ffield.ListEntries.Add Name:="Hello" 
Else 
 MsgBox "First field is not a drop down" 
End If

Use a Adicionar método com a coleção FormFields para adicionar um campo de formulário suspenso. O exemplo seguinte adiciona um campo de formulário suspenso no início do documento ativo e, em seguida, adiciona itens ao campo de formulário.

Set ffield = ActiveDocument.FormFields.Add( _ 
 Range:=ActiveDocument.Range(Start:=0, End:=0), _ 
 Type:=wdFieldFormDropDown) 
With ffield 
 .Name = "Colors" 
 With .DropDown.ListEntries 
 .Add Name:="Blue" 
 .Add Name:="Green" 
 .Add Name:="Red" 
 End With 
End With

Propriedades

Confira também

Referência do modelo de objeto do Word

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.