Name rašė:
> as nenoriu taip rasyti:
> Private Sub procedura_1()

Na, kaip mažas vaikas: aš nenoriu manų košės! :-)
Teks.
Beje, kriterijų gali būti tik 2. Naujesnės versijos (bent jau 
šviežesnės, nei xl2k3) gali filtruoti pagal masyvo reikšmes, naudojant 
operatorių xlFileterValues, tačiau wildcard'ų ten lyg ir negali būti.
Teks ieškoti kitokio būdo, nepriklausomai, kaip tu nenori daryti, 
norėdamas pasiekti rezultatą; vienas, kurį matau siūlant, yra pridėti 
papildomą stulpelį su tokia (ar pan. formule) formule:
=SUM(COUNTIF([CELL],{"aa*","bb*","cc*"}))>0

ir filtruoti pagal šio stulpelio reikšmes.