Apply filter from middle of Rows and clear the filter in excel using vbscript

 Rows("3:3").Select
    Selection.AutoFilter
    ActiveSheet.Range("$A$3:$W$223").AutoFilter Field:=3, Criteria1:= _
        "Betz Jeanne M"


'to remove the filter you just mention autofilter again

 ActiveSheet.Range("$A$5:$W$223").AutoFilter



Use OR operator duirng filter(apply multiple value filter):

    ActiveSheet.Range("$A$1:$CN$25425").AutoFilter Field:=30, Criteria1:= _
        "=Application", Operator:=xlOr, Criteria2:="=Minor Enhancements"

Apply filter for a string:

ActiveSheet.Range("$A$1:$CN$25425").AutoFilter Field:=2, Criteria1:= _
        "<>*cross*", Operator:=xlAnd