I will guess the listbox is from the forms toolbar instead of the control
toolbox toolbar

and Listbox_click is assigned to the listbox.


Sub Listbox_click()
dim sName as String
dim lbox as Listbox

sName = Application.Caller
set lbox = Activesheet.Listboxes(sName)

with lbox
msgbox sname & ": " & .list(.listindex)
End With


End Sub

--
Regards,
Tom Ogilvy


Bob Wilcox wrote in message
...
Hello,

In one module, I have sucessfully created and populated a
listbox on a worksheet. My last LOC in that module is to
Set objListBox = Nothing.

However, in the module, "ListBox_Click" (which does
display a MsgBox when clicked), I cannot determine the
values of the clicked data. Question, do I use Shapes,
Controls or somthing else? What and how do I set the
object?

B Wilcox