Select Listbox item based on Textbox value

[sharky12345]

I have a Listbox on a Userform that is loaded like this;

70    With Me.ListBox1
.ColumnCount = 11
.ColumnHeads = False
.ColumnWidths = "85;0;0;0;0;0;0;0;0;0;0"
.RowSource = Sheet7.Range("A2:K" & LastRow).Address(, , , True)
.IntegralHeight = True
End With

I've hidden all but the first column of data because that's all I need to see but the values are required elsewhere, hence I need to load all of the columns.

What I need to do is find the value of Texbox2 within the 2nd column of the Listbox values, (column B on the worksheet) and then select that item.

Can anyone help?

 

[Fluff]

How about

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Dim rw As Long
rw = Application.Match(Me.TextBox2.Value, Sheet7.Range("B:B"), 0)
Me.ListBox1.ListIndex = rw - 2
End Sub

 

[sharky12345]

Thanks Fluff!!

 

[Fluff]

You're welcome