Déselectionner valeur listbox
Bonjour,
j'essaye de déselectionner une valeur que j'ai sélectionné sur une listbox mais rien à faire .
J'ai essayé ces codes sans succès:
Dim i As integer
ListBox3.Selected(i) = False
j'ai essayé aussi:
Listbox3.ListIndex = -1
et enfin:
Dim i As Long
For i = 0 To listbox3.ListCount - 1
Listbox3.Selected(i) = False
Next
je précise que mon code vba est placé dans
Private Sub ListBox3_click()
et que je suis en fmmultiselect single
j'essaye de déselectionner une valeur que j'ai sélectionné sur une listbox mais rien à faire .
J'ai essayé ces codes sans succès:
Dim i As integer
ListBox3.Selected(i) = False
j'ai essayé aussi:
Listbox3.ListIndex = -1
et enfin:
Dim i As Long
For i = 0 To listbox3.ListCount - 1
Listbox3.Selected(i) = False
Next
je précise que mon code vba est placé dans
Private Sub ListBox3_click()
et que je suis en fmmultiselect single
1 réponse
-
Sormick, bonsoir le forum,
Étrange en effet et comme toi je me suis cassé les dents sur ce problème...
Au cas où, une solution avec le Double-Clic :
Private I As Byte Private Sub ListBox1_Change() On Error Resume Next I = Me.ListBox1.ListIndex End Sub Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean) Me.ListBox1.Selected(I) = False End Sub
