Hello Robert,
You can use DblClick event on the Listbox and you can get which valu
was doubleclicked with the code below.
Code
-------------------
ListBox1.List(ListBox1.ListIndex)
-------------------
Using this value, please try to find the value in the worksheet.
If you can find the range, you can get the ROW with rows property.
Next you can get appropriate information.
Code
-------------------
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim Seq
Dim rngFound As Range
Seq = ListBox1.List(ListBox1.ListIndex)
Set rngFound = Columns(2).Find(Seq)
If Not rngFound Is Nothing Then
MsgBox Cells(rngFound.Row, 2).Value
MsgBox Cells(rngFound.Row, 3).Value
MsgBox Cells(rngFound.Row, 4).Value
MsgBox Cells(rngFound.Row, 6).Value
End If
End Sub
-------------------
--
Message posted from
http://www.ExcelForum.com