Страницы: 1
RSS
VBA. Наполнение ComboBox на UserForm значениями с листа
 
Добрый день!
Уважаемые участники форума, помогите пожалуйста найти ошибку. Пытаюсь создать выпадающий список в UserForm в экслеле на основании заполненных ячеек, но форма ComboBox при запуске всегда пустая.
Где может быть ошибка?
Код
Private Sub ComboBox1_Change()

ComboBox1.List = Range(Worksheets("Контрагенты").Cells(2, 2), Worksheets("Контрагенты").Cells(10, 2)).Value


End Sub

 
Не на то событие повесили наполнение КомбоБокса
Согласие есть продукт при полном непротивлении сторон
 
То есть нужно использовать не .list, а что то другое?  
 
Цитата
DopplerEffect написал: не .list, а что то другое?
Событие, Карл!
Код
Private Sub UserForm_Initialize()
    With Worksheets("Контрагенты")
        ComboBox1.List = .Range(.Cells(2, 2), .Cells(10, 2)).Value
    End With
End Sub
Согласие есть продукт при полном непротивлении сторон
 
Спасибо, получилось!
 
Offtop.
Название темы улыбнуло . Я представил себе макрос в форме комбобокса.
По вопросам из тем форума, личку не читаю.
 
И кто теперь будет предлагать новое название?
 
'VBA. Наполнение ComboBox на UserForm значениями с листа'
Согласие есть продукт при полном непротивлении сторон
Страницы: 1
Читают тему
Наверх