Bonjour,

Je cherche à sélectionner et désélectionner l'ensemble des lignes d'un listview en activant un bouton. Pour cela, j'ai récupéré le code sur le tutoriel dans ce même site. J'ai donc codé :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
If b_sel.Caption = "Sélectionner tout" Then
       For x = 1 To l_etiq.ListItems.Count
           l_etiq.ListItems(x).Selected = True
       Next
       b_sel.Caption = "Désélectionner tout"
    Else
       For x = 1 To l_etiq.ListItems.Count
           l_etiq.ListItems(x).Selected = False
       Next
       b_sel.Caption = "Sélectionner tout"
       Set l_etiq.SelectedItem = Nothing
    End If
Cela ne fonctionne pas. Les lignes ne sont pas mises en surbrillance. La propriété MultiSelect est mise à true sur le listview.

Julien.