Word макросы выпадающий список

ТРЕНИНГИ

   Быстрый старт
   Расширенный Excel
   Мастер Формул
   Прогнозирование
   Визуализация
   Макросы на VBA

КНИГИ

   Готовые решения
   Мастер Формул
   Скульптор данных

ВИДЕОУРОКИ

ОНЛАЙН-КУРСЫ

ФОРУМ

   Excel
   Работа
   PLEX

© Николай Павлов, Planetaexcel, 2006-2022
info@planetaexcel.ru

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

Техническая поддержка сайта

1 11.03.2012 08:41:12

2 Ответ от aap77 01.04.2012 14:24:28

Public Property Get lstСписокОтделов() As Variant ' Свойство список отделов
Dim lst(1 To 5) As String
    lst(1) = "Проектирования"
    lst(2) = "Сборки"
    lst(3) = "Доставки"
    lst(4) = "Маркетинга"
    lst(5) = "Бухгалтерия"
    lstСписокОтделов = lst
End Property

Public Property Get lstСписокРуководителей() As Variant ' Свойство список руководителей
Dim lst(1 To 5) As String
    lst(1) = "Иванов И.И."
    lst(2) = "Петров П.П."
    lst(3) = "Сидоров С.С."
    lst(4) = "Смиронова М.А."
    lst(5) = "Потапова Т.С."
    lstСписокРуководителей = lst
End Property

Private Sub Document_New() ' Создание нового документа
    ActiveDocument.cmb_Отдел.List = lstСписокОтделов
    ActiveDocument.cmb_Отдел.ListIndex = 0
End Sub

Private Sub cmb_Отдел_Change()
    If ActiveDocument.cmb_Отдел.ListIndex >= 0 Then
        ActiveDocument.txtРуководитель.Text = lstСписокРуководителей(ActiveDocument.cmb_Отдел.ListIndex + 1)
    End If
End Sub

3 Ответ от Brain86 16.05.2012 14:31:21

4 Ответ от mikkelle 13.09.2016 12:43:58

5 Ответ от azur 12.06.2021 09:58:56

В интерфейсах программного обеспечения, а также на сайтах часто используется такой интерактивный элемент как раскрывающийся список, позволяющий выбрать какую-то определенную опцию или значение.  А как насчет документов Word, можно ли вставить такой список в обычный вордовский файл? Да, можно. На сайте разработчика текстового редактора даже имеется инструкция по добавлению интерактивных элементов.

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

Поэтому мы решили изложить ее более доступным и понятным языком.

Итак, чтобы иметь возможность использовать интерактивные элементы, сначала их нужно добавить на ленту инструментов Word.

Перейдите в меню «Файл» → «Параметры» → «Настроить ленту», отметьте флажком чекбокс «Разработчик» и сохраните настройки.

В результате в области заголовка текстового редактора у вас появится одноименный раздел, следующий сразу после раздела «Вид». Переключитесь на него. Установите курсор в то место документа, в которое хотите вставить выпадающий список, и выберите в блоке «Элементы управления» значок «Элемент управления содержимым «раскрывающийся список»».

Появится форма с текстом «Выберите элемент». По умолчанию она пуста и неактивна, чтобы добавить в нее элементы, нажмите в блоке «Элементы управления» ставшим активным пункт «Свойства». Также открыть свойства добавленной в документ формы можно из ее контекстного меню, но для этого в тех же «Элементах управления» сначала придется активировать режим конструктора.

Откроется окошко свойств, в котором формируется список. В поле «Название» укажите текст, который станет отображаться над выпадающим списком. Это поле не является обязательным для заполнения, при желании шаг можно пропустить. То же самое касается поля «Тэг». Элемент свойств «Показывать как» определяет внешний вид выпадающего списка, здесь же можно выбрать цвет рамки и даже задать собственный визуальный стиль формы и шрифта.

Чтобы добавить сами элементы списка, нажмите в окне свойств кнопку «Добавить», впишите в поле «Краткое имя» открывшегося диалогового окошка нужный вам текст и нажмите «OK». Точно так же добавьте второй, третий, четвертый и прочие элементы.

Выпадающий список готов.

В неактивном состоянии он будет отображаться как подсвечиваемый серым и заданным цветом текст «Выберите элемент»,  а в активном, то есть при нажатии на него – как обведенный рамкой поле с импровизированной стрелкой-кнопкой, раскрывающей содержимое списка.

Примечание: вместо «Элемента управления содержимым «раскрывающийся список»» можно использовать «Элемент управления содержимым «поле со списком»». Оба инструмента позволяют создавать выпадающие списки, но второй отличается тем, что название действия по умолчанию (выберите элемент) можно заместить произвольным текстом, ничем не отличающимся от остального текста в Word-документе.