Показать полную графическую версию : Форма 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
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
vBulletin v3.6.4, Copyright ©2000-2025, Jelsoft Enterprises Ltd.