Il va peut-être (sans aucun doute, à vrai dire) falloir que tu précises les choses (on ne désélectionne pas de la même manière selon que listbox à sélection simple ou multiple !)Je voudrais savoir comment désélectionner dans mon listbox
Private Sub UserForm_Click()
'Private Sub UserForm_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim i&
With ListBox1
For i = 0 To .ListCount - 1
.Selected(i) = False
Next
End With
End Sub
Private Sub UserForm_Click()
'Private Sub UserForm_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim i&
With ListBox1
If .MultiSelect = 0 Then .ListIndex = -1: Exit Sub 'si sélection unique
For i = 0 To .ListCount - 1
.Selected(i) = False
Next
End With
End Sub
Non, uniquement si le mode de sélection est la sélection unique.si tu veux tout désélectionner
.listindex=-1
MerciBonjour KTM, jmfmarques, CHALET53,
Oui, double-clic ou simple clic sur l'UserForm :
La méthode utilisée fonctionne sur sélection unique ou multiple dans la ListBox, voyez ce fichier.VB:Private Sub UserForm_Click() 'Private Sub UserForm_DblClick(ByVal Cancel As MSForms.ReturnBoolean) Dim i& With ListBox1 For i = 0 To .ListCount - 1 .Selected(i) = False Next End With End Sub
A+