Способы добавления данных в элемент управления ComboBox или ListBox элемент управления в Excel или Word

Переводы статьи Переводы статьи
Код статьи: 161598 - Vizualiza?i produsele pentru care se aplic? acest articol.
Microsoft Excel для Mac версии данной статьи см. 185388.
Развернуть все | Свернуть все

В этой статье

Аннотация

В данной статье описаны методы заполнения элемента управления ComboBox или ListBox.

Дополнительная информация

Корпорация Майкрософт предлагает примеры программного кода только для ознакомления, без гарантий, явных или подразумеваемых. Это включает, но не ограничивается, подразумеваемыми гарантиями товарной пригодности или пригодности для определенной цели. В данной статье предполагается, что вы знакомы с языком программирования предложенном и средствами, которые используются для создания и отладки. Сотрудники службы поддержки Майкрософт могут объяснить возможности конкретной процедуры, но они не будут изменять примеры для обеспечения функциональных возможностей или для удовлетворения конкретных требований.

Дополнительные сведения о доступных вариантах поддержки и о том, как связаться с корпорацией Майкрософт посетите следующий веб-узел корпорации Майкрософт:
http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS
Можно использовать элемент управления, например список или поле со списком в форме пользователя. В Microsoft Excel можно использовать эти элементы управления на листе. Способы заполнения элементов управления похожи. Примеры в этой статье с помощью элементов управления в форму пользователя.

Метод 1: Как связать со списком или списка в ячейки на листе Excel

  1. Создайте новую рабочую книгу в Microsoft Excel. На листе Лист1 typethe следующие:
          A1: One     B1: Red
          A2: Two     B2: Green
          A3: Three   B3: Yellow
          A4: Four    B4: Blue
    					
  2. Нажмите клавиши ALT + F11, чтобы запустить Microsoft Excel Visual BasicEditor.
  3. На Вставка меню, нажмите кнопку Пользовательская форма.
  4. Создание элемента управления ComboBox и элемент управления ListBox на пользовательской форме.
  5. Если окно свойств не отображается, нажмите кнопку Окно "Свойства" на Просмотр меню.
  6. Нажмите кнопку Поле со списком и перейдите к Источник строк в Окно "Свойства".

    Окно разделено на две части. Leftsection содержит имя свойства для элемента управления. Правый sectioncontains значение свойства. Нажмите кнопку в правой части ИсточникСтрок andtype"Лист1! a1: a4"(без кавычек).
  7. Нажмите кнопку ListBox и перейдите к Источник строк в окне «Свойства». Нажмите кнопку в правой части RowSourceand типа"Лист1! ячейки B1: B4"(без кавычек).

    ПРИМЕЧАНИЕ: Если опустить ссылки на лист, ComboBox и ListBoxcontrols заполняются данными из ячеек листа, isactive при выполнении пользователем формы. Чтобы данные из sameworksheet всегда используется для заполнения формы пользователем, включают referenceas лист, показано в примерах. Чтобы заполнить форму с данными из activesheet, не включать ссылки на лист в источник строк. При этом макрос использует данные из активного листа для заполнения пользователем формы.
  8. Запустите форму, нажав кнопку Запуск и выбрав Выполнение Sub/UserForm.
Один, два, три и четыре отображаются в элементе управления ComboBox; и красный, зеленый, желтый и синий отображаются в элементе управления ListBox.

Метод 2: Заполнение поля со списком или списка с помощью макроса Visual Basic

  1. Откройте приложение Microsoft Office, например Microsoft Excelor Word.
  2. Нажмите клавиши ALT + F11, чтобы запустить редактор Visual Basic.
  3. На Вставка меню, нажмите кнопку Пользовательская форма.
  4. Создайте поле со списком и элемент управления ListBox в форме пользователя.
  5. Щелкните правой кнопкой мыши форму и выберите Просмотреть код. Откроется окно кода для формы пользователем. Нажмите кнопку Инициализация в Процедура список (справа).

    Первая и последняя строки подпрограммы автоматически вводятся и isautomatically точка вставки помещается между этими двумя строками.
  6. Введите следующий код:
          ListBox1.List = Array("One", "Two", "Three", "Four")
          ComboBox1.List = Array("Red", "Green", "Yellow", "Blue")
    						
    Этот код должен находиться между строк "(Sub UserForm_Initialize)" и "End Sub".
  7. На Запуск меню, нажмите кнопку Выполнение Sub/UserForm Чтобы выполнить пользовательскую форму.
Один, два, три и четыре отображаются в элементе управления ListBox; и красный, зеленый, желтый и синий отображаются в элементе управления ComboBox.

Ссылки

Дополнительные сведения о пользовательских форм перейдите на вкладку указатель в справке по Microsoft Visual Basic, введите следующий текст:
Объект UserForm
а затем дважды щелкните выделенный текст для перехода к теме «Объект UserForm».

Свойства

Код статьи: 161598 - Последний отзыв: 9 февраля 2014 г. - Revision: 12.0
Информация в данной статье относится к следующим продуктам.
  • Microsoft Excel 2002 Standard Edition
  • Microsoft Word 2002 Standard Edition
  • Microsoft Excel 2000 Standard Edition
  • Microsoft Word 2000 Standard Edition
  • Microsoft Excel 97 Standard Edition
  • Microsoft Word 97 Standard Edition
  • Microsoft Word 2010
  • Microsoft Office Word 2007
  • Microsoft Office Excel 2003
  • Microsoft Excel 2010
  • Microsoft Office Excel 2007
  • Microsoft Office Word 2003
Ключевые слова: 
kbcontrol kbdtacode kbhowto kbprogramming kbmt KB161598 KbMtru
Переведено с помощью машинного перевода
ВНИМАНИЕ! Данная статья переведена с использованием программного обеспечения Майкрософт для машинного перевода и, возможно, отредактирована посредством технологии Community Translation Framework (CTF). Корпорация Майкрософт предлагает вам статьи, обработанные средствами машинного перевода, отредактированные членами сообщества Майкрософт и переведенные профессиональными переводчиками, чтобы вы могли ознакомиться со всеми статьями нашей базы знаний на нескольких языках. Статьи, переведенные с использованием средств машинного перевода и отредактированные сообществом, могут содержать смысловое, синтаксические и (или) грамматические ошибки. Корпорация Майкрософт не несет ответственности за любые неточности, ошибки или ущерб, вызванные неправильным переводом контента или его использованием нашими клиентами. Подробнее об CTF можно узнать по адресу http://support.microsoft.com/gp/machine-translation-corrections/ru.
Эта статья на английском языке: 161598

Отправить отзыв

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com