ListView DblClick on Event to get Values

[Rex2024]

I have a listview in a userform and want to be able to double click on the event and populate the data in both caption and value fields.

I am struggling with the code. This is one of the items that it supposed to work, but doesn't seem to be doing so.

Private Sub ListView1_DblClick
Dim TheSelectedItem As ListItem
If Me.ListView1.SelectedItems.Count > 0 Then
TheSelectedItem = Me.ListView1.SelectedItems(0)
Me.TextBox1.Text = TheSelectedItem.Text
Me.TextBox2.Text = TheSelectedItem.SubItems(0).Text
Me.TextBox3.Text = TheSelectedItem.SubItems(1).Text
End If
End Sub

 

[BrianM45]

Hi Rex2024

Try this

Private Sub ListView1_DblClick()
    With Me.ListView1
      If .SelectedItem <> "" Then
        Me.TextBox1.Text = .SelectedItem.Text
        Me.TextBox2.Text = .SelectedItem.ListSubItems(1).Text
        Me.TextBox3.Text = .SelectedItem.ListSubItems(2).Text
      End If
    End With
End Sub

 

[Rex2024]

I will give it a try! Thank you. Very much appreciated.

 

[Rex2024]

Works as intended with a little maneuvering for my specific needs. Thank you so much!