View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 27,285
Default multi selection list as text?

You can't link a multiselect listbox to a cell so that the cell displays the
multiple selections. You can use event code to loop through the list and
built a string of selected items, then write that to the cell.

Private Sub commandbutton1_click()
Dim i as long, msg as string
with me.Listbox1
for i = 0 to .listcount -1
if .selected(i) then
msg = msg & .list(i) & vbLf
end if
Next
End with
Activesheet.Range("B9").Value = msg
end Sub

--
Regards,
Tom Ogilvy


The concept of a multselect combobox escapes me.

--
Regards,
Tom Ogilvy

"HotRod" wrote in message
...
Is it possible to create a list in a cell that allows for multiple
selections and then shows these selections in the cell as plain text? This
works fine as a single selection but I have not been able to get it to

work
as a "list box" or a "combo box". Don't get me wrong I can make the
selections but they are not placed in the cell as text (So that I can't

cut
and paste)