Gurus,
What am I missing in the following code in order to search the 2nd column of a listbox
[VBA]
Private Sub TextBox2_Change()
Dim Search As String
Dim n As Long
Dim i As Long
Dim j As Long
Search = Me.TextBox2.Text
n = Len(Me.TextBox2)
j = Me.ListBox1.ListCount - 1
For i = 0 To j
If Left(Me.ListBox1.List(i), n) = Search Then
Me.ListBox1.Selected(i) = True
Exit For
End If
Next
End Sub
[/VBA]