Excel VBA: Searching for value in listbox based on value set in textbox

Mario Published at Dev

Mario

I am trying to write a code for a search button which searches a listbox based a specific input set in a textbox. The values searched are always numbers, and the listbox contains values from a single column. The code i wrote can be found below but i don't understand why it is not functional.

Legend:

SearchButton: A Button which upon clicking is supposed to initiate the search
SearchBox: The textbox which will contain the search value
AvailableNumberList: The listbox which contains the data

Thanks for your help :)

Private Sub SearchButton_Click()
Dim SearchCriteria, i, n As Double
SearchCriteria = Me.SearchBox.Value
n = AvailableNumberList.ListCount
For i = 0 To n - 1
If SearchCriteria = i Then
AvailableNumberList.ListIndex = i
End If
Next i
End Sub

Siddharth Rout

Is this what you are trying?

'If SearchCriteria = i Then
If AvailableNumberList.List(i) = SearchCriteria Then

Also use Exit For once a match is found :)

Collected from the Internet

Please contact [email protected] to delete if infringement.

edited at2021-02-13

Comments

0 comments

From Dev

how to use the listbox value to update textbox

From Dev

Excel VBA to select a range based on cell value

From Dev

VBA increment the "#" in TextBox#.value

From Dev

Listbox DataTemplate clear textbox value on selection

From Dev

VBA - Set Range for function Based on Header Value

From Dev

VBA EXCEL: Use value in Listbox as Lookup value in the Match WorksheetFunction

From Dev

VBA Access - TextBox Value to String

From Dev

Searching for a non-numeric value in VBA Excel

From Dev

Excel VBA: Color range based on cell value

From Dev

VBA Excel 2010 format textbox value as currecy

From Dev

VBA - Set Range for function Based on Header Value

From Dev