Excel VBA UserForm Listbox Clear All Items

Опубликовано: 05 Февраль 2015
на канале: InAnOffice

12,211

Excel VBA UserForm Listbox Learn how to clear all the items

The source code used in this video:

Private Sub cbRemove_Click()

For i = lbDays.ListCount - 1 To 0 Step -1
If lbDays.Selected(i) Then lbDays.RemoveItem (i)
Next i

End Sub

Private Sub cbRemoveAll_Click()
lbDays.Clear
End Sub

Private Sub UserForm_Initialize()

With lbDays
.AddItem "Monday"
.AddItem "Tuesday"
.AddItem "Wednesday"
End With

Смотрите видео Excel VBA UserForm Listbox Clear All Items онлайн без регистрации, длительностью часов минут секунд в хорошем качестве. Это видео добавил пользователь InAnOffice 05 Февраль 2015, не забудьте поделиться им ссылкой с друзьями и знакомыми, на нашем сайте его посмотрели 12,211 раз и оно понравилось 41 людям.