N.B. Si tu maintiens la touche "Ctrl" enfoncée, tu peux sélectionner un item ou le
désélectionner par un clic sur ce dernier avec la souris sans modifier la sélection
déjà active dans le listbox si la propriété "Multiselect" est activée.
Tu peux utiliser cet événement :
VB:
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
With Me.ListBox1
If .Selected(.ListIndex) Then
.Selected(.ListIndex) = False
End If
End With
End Sub