Option Explicit
Private Sub UserForm_Initialize()
With Me.ListBox1
.MultiSelect = fmMultiSelectMulti
.ListStyle = fmListStyleOption
.AddItem "A"
.AddItem "B"
.AddItem "C"
End With
End Sub

Worked ok for me.

Paul wrote:

I want to make my list box available for multi selection using checkboxes - I
know it must be easy, but I'm having a bad day and can't work it out.

--

Dave Peterson

Dave: Read the other postings. Right now he tried your suggestion. Paul
doesn't have the multiselection option and the Liststyle doesn't effect the
problem. the only thing that makes any sense is if he took a different type
object (like a textbox) and called it a listbox.

"Dave Peterson" wrote:

Option Explicit
Private Sub UserForm_Initialize()
With Me.ListBox1
.MultiSelect = fmMultiSelectMulti
.ListStyle = fmListStyleOption
.AddItem "A"
.AddItem "B"
.AddItem "C"
End With
End Sub

Worked ok for me.

Paul wrote:

I want to make my list box available for multi selection using checkboxes - I
know it must be easy, but I'm having a bad day and can't work it out.

--

Dave Peterson