'Filter Selection.AutoFilter Selection.AutoFilter Field:=1, Criteria1:="12" ActiveSheet.Range("A:O").AutoFilter Field:=9, Criteria1:="Bench-Allocation Pending" 'Filter view All Selection.AutoFilter Field:=1 If ActiveSheet.AutoFilterMode = True Then ActiveSheet.AutoFilterMode = False ActiveSheet.Range("$A$1:$R$" & endrows).AutoFilter Field:=4, Criteria1:="=CnTy", Operator:=xlOr, Criteria2:="=" Range(Range("C65536").End(xlUp), Cells(1)).AutoFilter