1

Тема: Скопировать и вставить combobox

Надеюсь, что сюда. Есть таблица в одной ячейке вставлен выпадающий список combobox. В его событии прописано:
Private Sub ComboBox2_DropButtonClick()
ComboBox2.List = Array(

2

Re: Скопировать и вставить combobox

Надеюсь, что сюда пишу smile. Есть таблица, в одной ячейке вставлен выпадающий список combobox. В его событии прописано:

Private Sub ComboBox2_DropButtonClick()
ComboBox2.List = Array("Принимается", "Оставляем без изменений", "Не принимается")
End Sub

Все работает, список есть, но если скопировать этот ComboBox в другую ячейку, то список пустой. Как бы это исправить?
Т.е. добавил я снизу новые строки в таблице, мне надо добавить в новую ячейку этот список, но как? Не буду же я каждый раз прописывать этот код для нового ComboBox.