Discussion :

[abdou57]

Bonjour,

j'ai un formulaire contenant une listbox que je veux remplir en VBA par la colonne A de la feuille excel mais sous forme de checkbox, afin de pouvoir faire une sélection qui me servira par la suite.

j'ai fais une ébauche, mais ça n'a pas marché.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Dim n As Long
    With Sheets("contrat")
        n = .Range("A" & .Rows.Count).End(xlUp).Row
    End With
    For i = 1 To n
        Dim chb As CheckBox
        With chb
            .Value = True
            .Text = Sheets("contrat").Cells(i, 1)
        End With
        UserForm1.ListBox1.AddItem (chb)
     Next

merci d'avance pour votre aide.

[helas]

Bonsoir,
Je ne pense pas qu'il soit possible d'inclure des CheckBox dans une liste déroulante mais seulement du texte

[abdou57]

Bonjour,
merci Helas, finalement j'ai modifié la propriété "ListStyle" au niveau du formulaire en selectionnant le format "fmListStyleOption", et au niveau du code VBA j'ajoute que du texte et ça marche.