Unselecting items in multi select list box

[cherman]

I have a list box set to multi select and a dropdown field. I want to
unselect any selected item in my list box on After Update of combp box.

I figure you have to cycle through the ItemsSelected and then turn it off,
but I cannot figure out how to do it. This is the last bit of code I tested:

Dim ctl As Control, varItem As Variant

Set ctl = Me.lstSAL

For Each varItem In ctl.ItemsSelected
ctl.ItemsSelected(varItem) = False
Next varItem

Can anyone help?

 

[Joerg Ackermann]

cherman:

I have a list box set to multi select and a dropdown field. I want to
unselect any selected item in my list box on After Update of combp
box.

I figure you have to cycle through the ItemsSelected and then turn it
off, but I cannot figure out how to do it. This is the last bit of
code I tested:

Dim ctl As Control, varItem As Variant

Set ctl = Me.lstSAL

For Each varItem In ctl.ItemsSelected
ctl.ItemsSelected(varItem) = False
Next varItem

Can anyone help?

Dim ctl As Control, varItem As Variant

Set ctl = Me.lstSAL

For Each varItem In ctl.ItemsSelected
ctl.Selected(varItem) = False
Next varItem

HTH
Acki

 

[Graham Mandeno]

You are very close

You need:
ctl.Selected(varItem) = False