Автофильтр VBA с массивом и подстановочными знаками

Question

Я использую AutoFilter в VBA. Код ниже работает отлично:

CASE 1:

    Windows("temp.xlsm").Activate
    Columns("A").Select
    arr = Array("=0AY*", "=0BR*")
    Selection.AutoFilter Field:=1, Criteria1:=arr, Operator:=xlFilterValues

Но когда я пытаюсь добавить еще один элемент кода в arr , ничего Отфильтровано:

Случай 2:

    Windows("temp.xlsm").Activate
    Columns("A").Select
    arr = Array("=0AY*", "=0BR*", "=0BM*"  )
    Selection.AutoFilter Field:=1, Criteria1:=arr, Operator:=xlFilterValues

В чем проблема?

Результаты: