Войти

Показать полную графическую версию : Форма Word 2016


yarovsemen
01-05-2017, 01:08
Господа, добрый день. Подскажите пожалуйста как с помощью средств форм word сделать вставку текста через выпадающий список. Суть задачи такова :
Нужен выпадающий список в котором указывается должность работника и его ФИО. Сама должность должна располагаться на нескольких строчках:

Директор комбаната ХХХ
в г. Ульяновск Козлов.А.В

yarovsemen
01-05-2017, 01:12
Вот так http://forum.oszone.net/attachment.php?attachmentid=145312&stc=1&d=1493590330

Iska
01-05-2017, 12:01
http://i.imgur.com/HkuZmy5.png

Текст поля «ПолеСоСписком1» помечаем как скрытый текст, дабы оно не выводилось на печать.
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



Включаем защиту форм:
http://i.imgur.com/ziqTa9f.png

Выбираем какой-либо пункт из списка:
http://i.imgur.com/fw0bN88.png

Нажимаем Tab, дабы выйти из поля (даже если оно одно — чтобы сработало событие завершение ввода поля), и смотрим на полученный результат в две строки:
http://i.imgur.com/Muw8fGi.png
Полагаю, вместо второго текстового поля можно обойтись и ссылкой на закладку, но пока не проверял сие.




© OSzone.net 2001-2012