Объект DropDown (Word)
Представляет раскрывающееся поле формы, содержащее список элементов в форме.
Используйте FormFields (index), где index — это номер индекса или имя закладки, связанное с полем раскрывающегося списка, чтобы вернуть один объект FormField . Используйте свойство DropDown с объектом FormField , чтобы вернуть объект DropDown . В следующем примере выбирается первый элемент в поле раскрывающейся формы с именем "DropDown" в активном документе.
ActiveDocument.FormFields("DropDown1").DropDown.Value = 1
Номер индекса представляет позицию поля формы в коллекции FormFields . В следующем примере проверяется тип первого поля формы в активном документе. Если это поле раскрывающейся формы, выбирается второй элемент.
If ActiveDocument.FormFields(1).Type = wdFieldFormDropDown Then
ActiveDocument.FormFields(1).DropDown.Value = 2
End If
В следующем примере определяется, является ли поле формы, представленное ffield , допустимым полем раскрывающегося списка перед добавлением в него элемента.
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
Используйте метод Add с коллекцией FormFields , чтобы добавить раскрывающееся поле формы. В следующем примере в начале активного документа добавляется раскрывающееся поле формы, а затем в поле формы добавляются элементы.
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
Справочник по объектной модели Word
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.