Discussion :

[Invité]

Bonjour,
J'ai une ListBox à plusieurs colonnes. Quant on double clic sur une ligne, ça fait appel à un evenement (lstContrats_DblClick).
J'aimerai mettre en place une nouvelle interaction avec cette ListBox, quand on clique une fois sur une ligne ça la selectionne (Ok ça de base ça le fait). Mais j'aimerai que quand on clique une seconde fois sur la même ligne ça la déselectionne (c'est pas un double clic vu que ce n'est pas une succession rapide de clic)

J'ai fais simplement:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub lstContrats_Click()
    If Me.lstContrats.ListIndex <> -1 And Me.lstContrats.Selected(Me.lstContrats.ListIndex) Then
'        Me.lstContrats.Selected(Me.lstContrats.ListIndex) = False
'        Me.lstContrats.ListIndex = -1
    End If
End Sub

Mais aucune des deux solutions ne fonctionne, on dirait que entre en conflict avec l'evenement gérant le double clic.

Merci de l'aide

[fring]

Bonjour,

Teste ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub lstContrats_Click()
    With Me.lstContrats
        Select Case .Selected(.ListIndex)
            Case True: .Selected(.ListIndex) = False
            Case Else: .Selected(.ListIndex) = True
        End Select
    End With
End Sub

[Invité]

Oui ça me fait la même chose.
En faite l'erreur arrive quand on fait un double clic.
A la ligne:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

szContrat = Me.lstContrats.List(Me.lstContrats.ListIndex, 0)

L'erreur est "Impossible de lire la propriété List. Index de la table de propriétés non valide."
Quand je regarde la valeur de Index, elle est toujours égale à -1, quelque soit la ligne sur la quelle je clic.
Je pense donc que l'évenement double clic et clic simple entre en conflit, ça déselectionne la ligne et donc met Index à -1.

[fring]

Regarde la propriété MultiSelect de ta ListBox, elle doit être sur MultiSelectMulti