Filter data using multiple criteria

hi,
i am trying to achieve filter two fields with multiple criteria

Please Login or Register  to view this content.

after execute above code amend this code with
now i want to add more filter in above filter
Sub Macro1()

Please Login or Register  to view this content.

Please Login or Register  to view this content.

filter also Field:=10 String "LJT" but with just value Field:=8 Criteria1:=Array( "127", "136", "137")