listbox double click which item

mp · External Since: May 11, 2010 Posts: 6

I want to know which item in a listbox was double clicked on.
This works but doesn't seem like i should have to do it this way

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim index As Integer

With ListBox1
For index = 0 To .ListCount - 1
If .Selected(index) Then
MsgBox index
End If
Next
End With

End Sub

thanks for any tips
mark

Jim Cone · External Since: Feb 20, 2010 Posts: 22

What you are looking for is the ListIndex...

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim Ndex As Long
Ndex = ListBox1.ListIndex
MsgBox Ndex
End Sub

Also, don't use index as a variable, Excel already uses it.
'---
Jim Cone
Portland, Oregon USA
http://www.contextures.com/excel-sort-addin.html
(30 different ways to sort in excel)

"mp"
wrote in message

>I want to know which item in a listbox was double clicked on.
> This works but doesn't seem like i should have to do it this way
>
> Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
> Dim index As Integer
>
> With ListBox1
> For index = 0 To .ListCount - 1
> If .Selected(index) Then
> MsgBox index
> End If
> Next
> End With
>
> End Sub
>
> thanks for any tips
> mark

mp · External Since: May 11, 2010 Posts: 6

Thanks

"Jim Cone" wrote in message

> What you are looking for is the ListIndex...
>
> Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
> Dim Ndex As Long
> Ndex = ListBox1.ListIndex
> MsgBox Ndex
> End Sub
>
> Also, don't use index as a variable, Excel already uses it.
> '---
> Jim Cone
> Portland, Oregon USA
> http://www.contextures.com/excel-sort-addin.html
> (30 different ways to sort in excel)
>
>
>
> "mp"
> wrote in message
>
>>I want to know which item in a listbox was double clicked on.
>> This works but doesn't seem like i should have to do it this way
>>
>> Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
>> Dim index As Integer
>>
>> With ListBox1
>> For index = 0 To .ListCount - 1
>> If .Selected(index) Then
>> MsgBox index
>> End If
>> Next
>> End With
>>
>> End Sub
>>
>> thanks for any tips
>> mark
>
>

CellShocked · External Since: Oct 22, 2009 Posts: 17

On Sat, 1 Jan 2011 14:55:20 -0600, "mp" wrote:

>I want to know which item in a listbox was double clicked on.
>This works but doesn't seem like i should have to do it this way
>
>Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
>Dim index As Integer
>
>With ListBox1
> For index = 0 To .ListCount - 1
> If .Selected(index) Then
> MsgBox index
> End If
> Next
>End With
>
>End Sub
>
>thanks for any tips
>mark
>
>

Listboxes are SINGLE click to SELECT. Unles you put up a hard picker
menu and assign hyperlinks or the like to each cell. Even then, it is
SINGLE click.

mp · External Since: May 11, 2010 Posts: 6

"CellShocked" wrote
in message
> On Sat, 1 Jan 2011 14:55:20 -0600, "mp" wrote:
>
>>I want to know which item in a listbox was double clicked on.
>>This works but doesn't seem like i should have to do it this way
>>
>>Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
>>Dim index As Integer
>>
>>With ListBox1
>> For index = 0 To .ListCount - 1
>> If .Selected(index) Then
>> MsgBox index
>> End If
>> Next
>>End With
>>
>>End Sub
>>
>>thanks for any tips
>>mark
>>
>>
>
> Listboxes are SINGLE click to SELECT. Unles you put up a hard picker
> menu and assign hyperlinks or the like to each cell. Even then, it is
> SINGLE click.

Thanks for your response. I'm not sure what your point is though.
I know I can select an item with a single click. I was just looking for
how to get at the item on which the user double clicks
(which also selects that item - as well as raising the dblclick event)
as Jim pointed out it was ListIndex i was forgetting.
Thanks
Mark
ps...cute nyme Smile