Copy text from a List box to a Cell!
 

I also forgot to mention that you will need to change the
name of the ListBox "List Box 2" to the name of your
ListBox.

Regards,
James S
-----Original Message-----
Hi Kevin,

You can try the code below. You will need to do the
following:

1) Add the code below to workbook.
2) Right-click your list box and select "Assign Macro",
then select the Macro named "ReturnListBoxSelection".
3) I used the worksheet name "Notes", so if your
worksheet name is different you will need to change
it.

Sub ReturnListBoxSelection()
Dim lbcf As ControlFormat

Set lbcf = ThisWorkbook.Worksheets("Notes").Shapes
("List Box 2").ControlFormat

ActiveCell.Value = lbcf.List(lbcf.ListIndex)
End Sub

Hope this helps.

Regards,
James S

-----Original Message-----
I made a List Box from the Form Menu and input a range
of cells
(Notes!$A$2:$A$21) that contain a list of names. What I
would like to do is,
to select a cell and the goto the List Box select a
Name
and then it would
just copy that name to the previously selected cell. Is
this possible? or
way to complicated to mess with.
At the moment all I do is select the name from the List
Box and the type the
name into the cell! Its just a list that helps me
remember all the names.

Thank you in advance for all your help!

Kevin Brenner