Multiline edit list box

[Tony C]

I am trying to incorporate a list box which aloys me to
make multiple choices from one list.

Help deosn't seem to give any. Can somebody please give
me a steer?

Many thanks

 

[Todd Huttenstine]

Set the ListStyle property of the listbox to 1-
fmListStyleOption.

 

[Bob Phillips]

Set the Multiselect option to true. You cane get the selected items like so

Dim i
With ActiveSheet.ListBox1
For i = 0 To .ListCount - 1
If .Selected(i) Then
MsgBox .List(i)
End If
Next i
End With


--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)