2016 - Форма Word 2016

[yarovsemen]

Господа, добрый день. Подскажите пожалуйста как с помощью средств форм word сделать вставку текста через выпадающий список. Суть задачи такова :

Нужен выпадающий список в котором указывается должность работника и его ФИО. Сама должность должна располагаться на нескольких строчках:



Директор комбаната ХХХ

в г. Ульяновск Козлов.А.В

Вложения

[Расширение jpg было запрещено, вложение больше недоступно.]

[yarovsemen]

Вот так

http://forum.oszone.net/attachment.p...1&d=1493590330

[Iska]

Примерный вид документа

[spoiler]

Текст поля «ПолеСоСписком1» помечаем как скрытый текст, дабы оно не выводилось на печать.[/spoiler]

Примерный код макросов

[spoiler]Код:

[/spoiler]

Код: Выделить всё

Option Explicit
Sub SetDropDownEntries()
    With ThisDocument.FormFields.Item("ПолеСоСписком1").DropDown.ListEntries
        .Clear
        .Add "Мама" & vbCr & "мыла раму"
        .Add "Рабы" & vbCr & "не мы"
        .Add "Мы не" & vbCr & "рабы"
    End With
End Sub
Sub SetValueFromDropDownList()
    With ThisDocument.FormFields
        .Item("ТекстовоеПоле1").Result = .Item("ПолеСоСписком1").Result
    End With
End Sub

Результат

[spoiler]Включаем защиту форм:



Выбираем какой-либо пункт из списка:



Нажимаем Tab, дабы выйти из поля (даже если оно одно — чтобы сработало событие завершение ввода поля), и смотрим на полученный результат в две строки:

[/spoiler]

Полагаю, вместо второго текстового поля можно обойтись и ссылкой на закладку, но пока не проверял сие.