Listbox with search

[RAires]

hello everyone!

I currently have a form with a listbox that shows the table from the worksheet.
I want to add a search button that when you search for a value it will change the listbox to only show the rows(but display all the info from the columns for that specific item), where the value you typed is at least matched in one of the columns, kinda like a filter.
I searched for a way to do it but all i found was people working with empy listboxes and then doing the search part.

my question is how do i go about doing this?

 

[NoSparks]

You don't give an over abundance of information, this is one possible approach.
Sheet2 is a spare blank sheet.

Private Sub UserForm_Initialize()
    Me.ListBox1.List = Sheets("Sheet1").ListObjects("Table1").DataBodyRange.Value
End Sub



Private Sub SearchButton_Click()
    Dim oLo As ListObject
    Dim i As Long, j As Long, k As Long
    
Set oLo = Sheets("Sheet1").ListObjects("Table1")

If Me.TextBox1 = vbNullString Then
    Me.ListBox1.List = oLo.DataBodyRange.Value
    Exit Sub
End If

Sheets("Sheet2").Cells.ClearContents
k = 1

With oLo
    For i = 1 To .ListRows.Count
        For j = 1 To .ListColumns.Count
            If .DataBodyRange.Cells(i, j) = Me.TextBox1 Then
                .ListRows(i).Range.Copy Sheets("Sheet2").Cells(k, 1)
                k = k + 1
                Exit For
            End If
        Next j
    Next i
End With

Me.ListBox1.List = Sheets("Sheet2").Cells(1).CurrentRegion.Value
    
End Sub

 

[NoSparks]

Seeing where this thread is going I'm sure glad you never acknowledged the response to your question here.