Déselectionner valeur listbox

Sormick Messages postés 146 Date d'inscription   Statut Membre Dernière intervention   -  
ThauTheme Messages postés 1442 Date d'inscription   Statut Membre Dernière intervention   -
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



1 réponse

ThauTheme Messages postés 1442 Date d'inscription   Statut Membre Dernière intervention   160
 
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

0