simora
03-07-2017, 12:10 PM
I'm currently populating a Listbox in a userform like this:
With ListBox1
.AddItem rngFind.Address ' Cell Address
.List(.ListCount - 1, 1) = (Cells(loc, 1)) ' First Column of found row
.List(.ListCount - 1, 2) = (Cells(1, Col))
End With
rngFind.Address is the result of a search in the UserForm
How can I select the rngFind.Address on Sheet1 when the user clicks that listbox item in the Userform ?
It needs to go into the Private Sub ListBox1_Click() Module.
Thanks
With ListBox1
.AddItem rngFind.Address ' Cell Address
.List(.ListCount - 1, 1) = (Cells(loc, 1)) ' First Column of found row
.List(.ListCount - 1, 2) = (Cells(1, Col))
End With
rngFind.Address is the result of a search in the UserForm
How can I select the rngFind.Address on Sheet1 when the user clicks that listbox item in the Userform ?
It needs to go into the Private Sub ListBox1_Click() Module.
Thanks