Select and delete multiple items from a listbox

[kelly mort]

Hello all,
Is there away to select and delete multiple items from a listbox?

If yes then please help me out with a script.

I will want to use option buttons to switch between the multiple selection and single selection in the listbox.

The selection may be continuous or non continuous. Thanks in advance
Kelly

 

[kelly mort]

Still need help with this

 

[My Aswer Is This]

You must be using a Multiselect listbox
And you must not load the values into the listbox using RowSource.
Select the values in the listbox you want removed
Then use this script:

Private Sub CommandButton6_Click()
   For i = ListBox1.ListCount - 1 To 0 Step -1
        If ListBox1.Selected(i) Then
            ListBox1.RemoveItem i
        End If
    Next
End Sub

 

[kelly mort]

Okay thanks.

Will this remove the data from the database as well?

 

[My Aswer Is This]

Okay thanks.

Will this remove the data from the database as well?

No