List Box hold the Previous selections

[Shamli]

Hi



List Box that populates values from a table.

I am doing a multi select and on clicking submit button (Command), the selected list appends to another table.

Now my problem is when I wanted to the same operation next time, the list box holds the previously selected values.
How to refresh the list box everytime.

[June7]

Code to unselect all items:

Dim x As Integer
For x = 0 To Me.listboxname.ListCount
     Me.listboxname.Selected(x) = False
Next

Or

    Dim varItem As Variant
    With Me.listboxname
        If .ItemsSelected.Count <> 0 Then
            For Each varItem In .ItemsSelected
                .Selected(varItem) = False
            Next
        End If
    End With

[Shamli]

Thank you so much for replying.
Its just that. I have two list boxes.
1. Employee
2. Projects
Once the employee is selected. user can allot the projects from the project list table
on clicking the add button, its been appended to a table.
Problem is: after appending. the list box is not refreshing , when another employee is selected. The project list box hold the previous selection.

Code to unselect all items:

Dim x As Integer
For x = 0 To Me.listboxname.ListCount
     Me.listboxname.Selected(x) = False
Next

[June7]

Edited my previous post after you read it.

Does code work for you?

I presume this listbox is UNBOUND.

[Shamli]

It Worked!!!!
Thank you so much!!!

Edited my previous post after you read it.

Does code work for you?

I presume this listbox is UNBOUND.