Раскрывающийся список

[segail]

Несколько нюансов.

Кнопка “Добавить”
Нельзя ввести в ComboBox1 одинаковые данные, если они уже есть в ComboBox1

Кнопка “Удалить”
Если в ComboBox1 нет данных, а пользователь жмет кнопку “Удалить” то выходит ошибка.
Если пользователь раскрыл список ComboBox1 для удаления и нажал кнопку “Удалить” то тоже выходит ошибка.

[segail]

Для кнопки удалить я выбрал такой вариант

Private Sub CommandButton2_Click()
If ComboBox1.Value = "" Then
ComboBox1.Value = ""
Else
Me.ComboBox1.RemoveItem (Me.ComboBox1.ListIndex)
Me.ComboBox1.Value = ""
End If
End Sub

А для кнопки добавить???

[The_Prist]

Я выложил полностью рабочий вариант согласно Ваших слов.
А про нюансы Вы ни слова не написали ранее. Надо было между строк читать? Когда же научимся правильно и четко свои вопросы формулировать? Ведь Вы уже старожил на форуме - дольше меня здесь обитаете.

[segail]

Спасибо.................

[segail]

Здравствуйте.
Подскажите, как создать порядковую сортировку или фильтрацию данных по именам (например камаз) в объекте раскрывающийся список, при выполнение команды ComboBox1_Change?

[segail]

Здравствуйте.

Возникла ситуация, при вводе данных с TextBox1 в ComboBox1. Необходимо, что бы данные параллельно вводились в ячейки листа. Количество вводимых значений ограничено (20 значений, значения вводятся в ячейки напротив нумерации, листа “Расход”). Если данные удаляются и ячейка освобождается, то последующий ввод данных вводится в начальную ячейку, по нумерации свободных.
При удалении значения в ComboBox1, параллельно удаляются значение той ячейке, в котором это значение находится. Данные ячейки являются основными ячейками, после каждой основной ячейки скрыто по 151 (или будет скрыто) ячеек. При удалении значений в основных ячейках необходимо создать условие. Удаление значения в основной ячейке должно осуществляться в том случае, если все 151 одна ячейка основной ячейки (в которой на данный момент удаляется значение) не имеют данных, то есть пустые “”

Как таковой код готов, это показано в примере, необходимо его дополнить, выше сказанным. Что не ясно дополню, надо оплата, оплачу.

[skapitan]

Добрый день,
я создала файл с двумя выпадающими списками без макросов обычными средствами Excel. Можно ли придумать макрос который бы при нажатии на кнопку добавлял строку с Combobox внизу под уже существующими строками.