Filtriranje po več kriterijih

Pomoč pri izdelavi makrov
Odgovori
jumanjy
Prispevkov: 133
Pridružen: To Jan 12, 2010 1:00 pm

Filtriranje po več kriterijih

Odgovor Napisal/-a jumanjy »

Pozdravljeni,

Koda: Izberi vse

 ActiveSheet.Range("$E$9:$E$50").AutoFilter Field:=1, Criteria1:=Range("D8")
Vprašal bi vas, če je možno zgornjo kodo s katero filtriram neko območje prilagoditi tako, da bi filtrirala po več kriterijih ki bi bila podana na območju "D8:D12".
admin
Site Admin
Prispevkov: 3687
Pridružen: Sr Jul 20, 2005 10:06 pm

Re: Filtriranje po več kriterijih

Odgovor Napisal/-a admin »

Seveda,

To vam pove že Excel sam, če posnamete makro in pogladate kaj je naredil. Videli boste nekaj takšnega:

Koda: Izberi vse

 ActiveSheet.Range("$E$9:$E$50").AutoFilter Field:=1, Criteria1:=Range("D8")
 ActiveSheet.Range("$E$9:$E$50").AutoFilter Field:=2, Criteria1:=Range("C8")
 ActiveSheet.Range("$E$9:$E$50").AutoFilter Field:=3, Criteria1:=Range("B8")
lp,
Matjaž Prtenjak
Administrator
jumanjy
Prispevkov: 133
Pridružen: To Jan 12, 2010 1:00 pm

Re: Filtriranje po več kriterijih

Odgovor Napisal/-a jumanjy »

Pozdravljeni,
Mogoče nisem bil dovolj razumljiv z vprašanjem, tak makro kot ste mi ga ponudili pride, če posnamem ko filtriram po več kolonah jaz bi pa rad v eni koloni filtriral po več kriterijih ki jih imam napisane v drugem stolpcu. Poizkusil sem ga posneti in pride nekaj takega kot je spodaj vendar namesto "1","2","3" bi rad imel sklic na celice v katerih so kriteriji.

Koda: Izberi vse

 ActiveSheet.Range("$A$1:$A$20").AutoFilter Field:=1, Criteria1:=Array("1", _
        "2", "3"), Operator:=xlFilterValues
admin
Site Admin
Prispevkov: 3687
Pridružen: Sr Jul 20, 2005 10:06 pm

Re: Filtriranje po več kriterijih

Odgovor Napisal/-a admin »

Potem pač vstavite polje vrednosti:

Koda: Izberi vse

  Dim vrednosti(3) As String
  
  vrednosti(1) = Range("B2")
  vrednosti(2) = Range("c2")
  vrednosti(3) = Range("d2")
  ActiveSheet.Range("$A$1:$A$20").AutoFilter Field:=1, Criteria1:=vrednosti, Operator:=xlFilterValues
lp,
Matjaž Prtenjak
Administrator
jumanjy
Prispevkov: 133
Pridružen: To Jan 12, 2010 1:00 pm

Re: Filtriranje po več kriterijih

Odgovor Napisal/-a jumanjy »

Sedaj pa deluje tako kot mora.
Najlepša hvala!
Odgovori