de-select items in a listbox

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Is there a way using VBA to unselect (deselect) all entries in a multi-select
or single-select listbox?

Thanks in advance for your help!
 
PeterM said:
Is there a way using VBA to unselect (deselect) all entries in a
multi-select or single-select listbox?

Thanks in advance for your help!
Click to expand...

A single-select list box is easy: just set its value to Null.

For a multiselect list box:

'----- start of code -----
Function ClearListBoxSelections(lst As Access.ListBox)

Dim intI As Integer

With lst
For intI = (.ItemsSelected.Count - 1) To 0 Step -1
.Selected(.ItemsSelected(intI)) = False
Next intI
End With

End Function

'----- end of code -----
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Listbox problem 3
Access Using DAO.Database VBA code to populate a listbox from another listbox selection 1
Deselect last item selected in multi select listbox 5
Selecting Listbox items in code 2
Access Cannot select items in listbox 1
Deselecting items in a multiple-selec Listbox 1
Deselecting items in a listbox 2
Delete Single item from multi select listbox 3

Back
Top