filter by more than 2 criteria

I'm applying the following filtering:
Worksheets("Sheet1").Select

Selection.AutoFilter Field:=1, Criteria1:="=ERP", Operator:=xlOr, _
Criteria2:="=PM" ' Working well

But, I need more criterias there such as:

Selection.AutoFilter Field:=1, Criteria1:="=ERP", Operator:=xlOr, _
Criteria2:="=PM" ', Operator:=xlOr, Criteria3:="=HPW" , _
Operator:=xlOr, Criteria4:="=OJT", _
Operator:=xlOr, Criteria5:="=SBR", _
Operator:=xlOr, Criteria6:="=LD", _
Operator:=xlOr, Criteria7:="=CFT"

How could I do it?

Thanks