Excel vba Filtered table BodyRange incorrect SpecialCells

Question

I have a table which I filter with a vba command:

tbl.Range.AutoFilter Field:=11, Criteria1:="=*" & Left(street, 3) & "*", Operator:=x