In the properties windos, set the ListStyle to fmListStyleOption and set
MultiSelect to fmMultiSelectMulti.


"David Gerstman" schreef in bericht
...
I want to create a listbox of choices. When the user clicks on checkboxes
corresponding to a choice I will use those choices for further processing.
This is what I have so far; how do I display the requisite checkboxes for
the
choices?

Sub load_names()
Dim emp_range As Range
Worksheets(1).Activate
Set emp_range = ActiveSheet.Range("b2", Range("b2").End(xlDown))
ind = 1
For Each c In emp_range
UserForm1.ListBox1.AddItem c.Value
ind = ind + 1
Next c
UserForm1.Show
End Sub

thanks,
David