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