combobox
Модератор: Naeel Maqsudov
-
Настя Белова
- Сообщения: 31
- Зарегистрирован: 28 мар 2014, 13:17
На листе Excel написаны все Фамилия. Есть форма в котором есть combobox,как сделать чтобы фамилия из листа отображались в combobox?
-
Naeel Maqsudov
- Сообщения: 2570
- Зарегистрирован: 20 фев 2004, 19:17
- Откуда: Moscow, Russia
- Контактная информация:
Смотрите свойства комбобокса. У него должно быть что-то типа ListSource. В этом свойстве пишется ссылка на диапазон со значениями. Например, Лист1!E5:E1000
-
Настя Белова
- Сообщения: 31
- Зарегистрирован: 28 мар 2014, 13:17
В VBA нету свойства такого
Анастасия, Не будем эгоистами 
и подскажем другим читателям этого топика, которым, возможно, нужно решение, что Naeel Maqsudov прав и если диапазон-источник неизменен, то можно вообще обойтись без VBA, ибо есть свойство RowSource
Если же ComboBox нужно заполнить именно программно, то :
1) цикл (в случае, если среди фамилий могут встречаться, например, пустые ячейки)
2)
3)
и подскажем другим читателям этого топика, которым, возможно, нужно решение, что Naeel Maqsudov прав и если диапазон-источник неизменен, то можно вообще обойтись без VBA, ибо есть свойство RowSourceЕсли же ComboBox нужно заполнить именно программно, то :
1) цикл (в случае, если среди фамилий могут встречаться, например, пустые ячейки)
2)
Код: Выделить всё
ComboBox1.RowSource = "Лист1!A1:A100"Код: Выделить всё
ComboBox1.List = Application.Range("Лист1!A1:A100").Value
или
ComboBox1.List = ThisWorkbook.Worksheets("Лист1").Range("A1:A100").Value