Pivot table filter based on text box or cell value, vba?

Hi.

I have a massive (500,000k rows) data dump of safety checks carried out on employes.
The column data i have is...

Team - Name - ID - Check No

what i want is a cell or text box at the top whereby i can start to enter an ID or Team and the filter will automatically start drilling down on my data. So if i enter 603, the staff with IDs starting with 603 will be shown, and all of their checks on the right. each name/id is repeated for each check so it will pull all the correct data, just not sure how to write the VBA code for it.

Any ideas?


I found this online,

Private Sub TextBox1_Change()
Dim s As String
s = TextBox1
Range("A1").AutoFilter Field:=3, Criteria1:=s & "*", Operator:=xlAnd
End Sub


however this was to search for a ID eg, ABC. I want it to search for numbers, eg, 600109232. When i start typing 6, i get no results. something to do with text/numbers maybe.