Удаление всех объектов от ComboBox?

Question

Как я могу программно удалить все объекты из поля комбинированного списка в VBA?

17

vba combobox

задан sooprise 8 June 2010 в 14:22

2 ответа

Psuedo code ahead (updated with actual code):

Do While ComboBox1.ListCount > 0
    ComboBox1.RemoveItem (0)
Loop

По сути, пока у вас есть элементы, удалите первый элемент из combobox. Как только все элементы будут удалены (счетчик = 0), ваш ящик станет пустым.

Метод 2: еще лучше

ComboBox1.Clear

29

ответ дан 30 November 2019 в 10:05

Другие вопросы по тегам:

vba combobox

score 28 · Accepted Answer

К сожалению, вам нужно удалить каждый по отдельности:

       For i = 1 To ListBox1.ListCount

           'Remove an item from the ListBox using ListBox1.RemoveItem 
       Next i

Обновление - я не знаю, почему в моем ответе не было полного решения:

For i = ListBox1.ListCount - 1 to 0 Step - 1 
        ListBox1.RemoveItem i 
Next i