В настоящее время вы работаете в автономном режиме; ожидается повторное подключение к Интернету

Как создать поле со списком, который содержит более 25 элементов в Word 2002

ВНИМАНИЕ! Перевод данной статьи был выполнен не человеком, а с помощью программы машинного перевода, разработанной корпорацией Майкрософт. Корпорация Майкрософт предлагает вам статьи, переведенные как людьми, так и средствами машинного перевода, чтобы у вас была возможность ознакомиться со статьями базы знаний KB на родном языке. Однако машинный перевод не всегда идеален. Он может содержать смысловые, синтаксические и грамматические ошибки, подобно тому как иностранец делает ошибки, пытаясь говорить на вашем языке. Корпорация Майкрософт не несет ответственности за неточности, ошибки и возможный ущерб, причиненный в результате неправильного перевода или его использования. Корпорация Майкрософт также часто обновляет средства машинного перевода.

Эта статья на английском языке:306258
Эта статья помещена в архив. Она предлагается "как есть" и обновляться не будет.
Для Microsoft Word 2000 версии данной статьи См 198561.
Для Microsoft Word 97 просмотреть версию этой статьи 194026.
Для Microsoft Word 98 просмотреть версию этой статьи 194027.
Аннотация
В данной статье описывается, как создавать и использовать пользовательскую форму Поле со списком как макроса для текстового поля. Этот макрос можно использовать в качестве обход ограничения в 25 элементов в раскрывающемся списке поля.


ПРИМЕЧАНИЕ: Для получения дополнительных сведений о том, как в следующих случаях, При использовании базы данных Microsoft Access, щелкните следующий номер для статьи номер статьи базы знаний Майкрософт:
253542WD: Как создать поле со списком с более 25 элементов из базы данных Microsoft Access
Дополнительная информация
Корпорация Майкрософт предлагает примеры программного кода только для иллюстрации Это включает, но не ограничивается, подразумеваемые гарантии товарности или пригодности для определенной цели. В данной статье предполагается, что вы знакомы с языком программирования предложенном и с помощью средств, которые используются для создания и отладки. Сотрудники службы поддержки Майкрософт могут пояснить конкретной процедуры, но они будут изменять примеры для реализации дополнительных возможностей или удовлетворения конкретных требований.
Для получения дополнительных сведений об использовании пример кода в данной статье, щелкните следующий номер статьи для просмотра статьи в Microsoft Knowledge Base:
290140OFFXP: Как запустить пример кода из статей базы знаний
В шаблоне Word выполните следующие действия.

ПРИМЕЧАНИЕ: Для закрытия окна (например, окно программы или свойства окно), нажмите кнопку X в правом верхнем углу окна.

Создание поля со списком UserForm

  1. На Сервис Выберите пункт Макрос и выберите команду Редактор Visual Basic.
  2. В Окно проекта, выберите ваш TemplateProject.

    ПРИМЕЧАНИЕ: Если Окно проекта не виден, нажмите кнопку Обозреватель проектов В меню Представление меню.
  3. На Вставка меню, нажмите кнопку Пользовательская форма. Появятся пользовательская форма и панель элементов. Щелкните правой кнопкой мыши Пользовательская форма, а затем нажмите кнопку Просмотр кода. Добавьте следующий код:
    Private Sub UserForm_Initialize()  ComboBox1.ColumnCount = 1  'Load data into ComboBox  ComboBox1.List() = Array("Zero", "One", "Two", "Three")End Sub

    Закройте окно программы.
  4. Щелкните правой кнопкой мыши пользовательскую форму и нажмите кнопку Свойства в контекстном меню. На Буквы Вкладка, переименование (Имя) Кому Пользовательская форма, а затем переименуйте Заголовок Кому Microsoft Word. Закройте окно Свойства пользовательской формы.
  5. На Элементы управления вкладки панели элементов, Выбор Поле со списком и поместить его в пользовательскую форму. Щелкните правой кнопкой мыши Поле со списком элемент управления, а затем нажмите кнопку Просмотр кода в контекстном меню. Изменение Поле со списком Код ниже
    Private Sub ComboBox1_Change()   ActiveDocument.FormFields("Text1").Result = ComboBox1.ValueEnd Sub						
    а затем закройте окно программы.

    ПРИМЕЧАНИЕ: Текст1 — это имя закладки текстовое поле, то будет Вставьте в шаблон на шаге 2 «Создание текстового поля» процедура, далее в этой статье.
  6. На Элементы управления вкладки панели элементов, Выбор CommandButtonи поместите его в пользовательскую форму как Закрыть Нажатие кнопки. Щелкните правой кнопкой мыши CommandButton, а затем нажмите кнопку Просмотр кода в контекстном меню. Изменение кода CommandButton следующие
    Private Sub Cmdclose_Click()  Unload MeEnd Sub						
    а затем закройте окно программы. Щелкните правой кнопкой мыши CommandButton, а затем нажмите кнопку Свойства в контекстном меню. На Буквы Вкладка, переименование (Имя) Кому Cmdclose, а затем переименуйте Заголовок Кому Закрыть. Закройте окно свойств CommandButton.
В поле со списком UserForm, уже выполнено. Перейдите к разделу "Создание раздел макроса"данной статьи.

Создание макроса

  1. В окне проекта выберите ваш TemplateProject.
  2. На Вставка меню, нажмите кнопку Модуль. Появится список кодов пустого модуля.
  3. Введите следующий код:
    Sub gocombobox()   UserForm.ShowEnd Sub					
Запись макроса завершена. На Файл меню, нажмите кнопку Закрыть и вернуться в Microsoft Word. Перейдите к разделу «Создание текстового поля» это статьи, чтобы создать поле формы в шаблоне Word.

Создать текстовое поле

  1. В шаблоне на Представление Выберите пункт Панели инструментов и выберите команду Формы.
  2. Установите курсор в то место, куда в результате раскрывающийся список, который вставлен. На Формы панель инструментов, нажмите кнопку Текстовое поле (первая кнопка слева). Вставить текстовое поле в шаблон с серым затенением.

    ПРИМЕЧАНИЕ: Если вы видите {FORMTEXT} Нажмите клавишу ALT + F9, чтобы отключить коды полей.
  3. Щелкните правой кнопкой мыши Текстовое поле, а затем нажмите кнопку Свойства в контекстном меню.
  4. В Параметры текстового поля диалоговое окно, в группе Выполнить макрос раздел, Щелкните стрелку в Запись Выберите gocombobox макрос, а затем нажмите кнопку ОК.

    ПРИМЕЧАНИЕ: Убедитесь, что Имя закладки. от вашего Текстовое поле такой же, как указано в шаге 4 "Создание Поле со списком UserForm"разделе этой статьи.
  5. На Формы панель инструментов, нажмите кнопку Защита формы.
  6. Сохраните и закройте шаблон.
Чтобы использовать шаблон, нажмите кнопку Новый В меню Файл меню, а затем нажмите кнопку Общие шаблоны В диалоговом окне Новый документ область задач. В Шаблоны диалоговое окно, выберите шаблон и нажмите кнопку ОК. Откроется новый документ на основе шаблона. Пользовательская форма содержащий ComboBox с вашими элементами отображаются при использовании клавиши TAB для перемещения в Текстовое поле.
VBA vbe vb раскрывающегося списка

Внимание! Эта статья переведена автоматически

Свойства

Номер статьи: 306258 — последний просмотр: 12/06/2015 04:56:24 — редакция: 6.0

Microsoft Word 2002 Standard Edition

  • kbnosurvey kbarchive kbcontrol kbprogramming kbvba kbhowto kbmt KB306258 KbMtru
Отзывы и предложения