Как заполнить поле со списком указанными данными в открытой книге?
Обычно вы можете заполнить поле со списком (элемент управления ActiveX) определенным диапазоном данных ячеек, введя ссылки на ячейки в поле ListFillRange свойств поля со списком. Если вы хотите заполнить поле со списком указанными данными напрямую, не задавая его свойства вручную, вам может помочь метод, описанный в этой статье.
Заполните поле со списком указанными данными с кодом VBA
Заполните поле со списком указанными данными с кодом VBA
Этот метод может помочь вам заполнить поле со списком указанными данными непосредственно при открытии книги. Пожалуйста, сделайте следующее.
1. нажмите другой + F11 клавиши одновременно, чтобы открыть Microsoft Visual Basic для приложений окно.
2. в Microsoft Visual Basic для приложений окно, дважды щелкните Эта рабочая тетрадь на левой панели, чтобы открыть Эта рабочая тетрадь редактор кода. А затем скопируйте в него код VBA ниже. Смотрите скриншот:
Код VBA: заполнить поле со списком указанными данными при открытой книге
Private Sub Workbook_Open()
'Updated by Extendoffice 2018/1/30
With Sheet1.ComboBox1
.Clear
.AddItem "Select a Fruit"
.AddItem "Apple"
.AddItem "Banana"
.AddItem "Peach"
.AddItem "Pineapple"
.AddItem "Watermelon"
.Text = .List(0)
End With
End Sub
Заметки:
3. Сохраните книгу как Excel Macro-Enabled Workbook форматировать и закрыть.
4. Снова откройте книгу, вы увидите, что поле со списком было заполнено указанными данными, как показано на скриншоте ниже:
Статьи по теме:
- Как скопировать значение поля со списком в активную ячейку в Excel?
- Как отобразить формат даты в выводе поля со списком в Excel?
- Как предотвратить или отключить ввод текста в поле со списком в Excel?
- Как заполнить поле со списком данными именованного диапазона в Excel?
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!