We use a formula to filter the data in a spreadsheet based on one cell. The filter runs when you press "enter". We want the filter to run every time we add a character to the cell.
For example if we type "frans" in a2 and press enter it will filter on "frans" but we want it to already filter on the first character "f" if we type it.
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160606
If Target.Address = Range("a2").Address Then
Range("A5:E2500").CurrentRegion.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range("a1:a2")
End If
End Sub