Search in 3 columns by textbox with autofilter (excel vba)

[ExcelNewbie2020]

I don't know if its possible with excel vba. I would like to create 1 textbox that will search from 3 columns. Then it will do auto filter. I hope there is a vba code for that..Thank you very much...
Please see screenshot.

 

[Takae]

I recommend use a cell instead the textbox .And what would you like to do after filter?

Please paste this code on the sheet module(Right click on the Tab-name and select "V").
Every time you put something on A1, this macro runs automatically.

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim i As Long
    If Intersect(Target, Range("A1")) Is Nothing Then
        Exit Sub
    Else
        Range("A6").AutoFilter
        For i = 1 To 3
            Range("A6").AutoFilter field:=i, Criteria1:=Target
            If WorksheetFunction.Subtotal(3, Range(Cells(6, i), Cells(Rows.Count, i).End(xlUp))) > 1 Then
                Exit Sub
            End If
            Range("A6").AutoFilter
        Next
    End If
    MsgBox "no result"
End Sub

Hope this helps.