Selectionner plusieurs valeurs dans une listbox en appuyant sur un bouton

**Marc31** · 14/10/2015, 17h01

Re re bonjour,

J'ai actuellement une base avec des stagiaires, avec un userform ou il y a une listbox et quand on fait un choix dans la combobox, la listbox s'actualise avec les nom, prénoms des stagiaires.
Une fois ceci fais on peut cliquer dans la listbox pour choisir un stagiaire mais j'aimerais savoir si on peux faire un bouton qui sélectionnerais tous les stagiaires dans la listbox?

**Theze** · 14/10/2015, 20h18

Bonsoir,

Avec ceci :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Private Sub CommandButton1_Click()
 
    Dim I As Integer
 
    With ListBox1
 
        .MultiSelect = fmMultiSelectMulti
 
        For I = 0 To .ListCount - 1
            .Selected(I) = True
        Next I
 
    End With
 
End Sub