Hi,

Im trying to make a search function for my listbox. I want it to happen in the following way:
When you type in the textbox txbSearch, all rows that have nothing to do with the search text are removed from the listbox or are invisible.
If possible i want the search function to search all columns at once.
My listbox is currently set up in the following way: 
Set r = Range("T1").CurrentRegion
    Set r = r.Offset(1).Resize(r.Rows.Count - 1)
    With Lsb1
        .ColumnCount = r.Columns.Count
        .RowSource = r.Address
        .ColumnHeads = True
    End With
Does anybody know how to do this?

Thanks in advance