süzme komutu

[recep]

otomatik süz komutda süzülecek değerin bir başka sayfadaki hüçre değeri olmasını istiyorum

ör. sayfa 1 a1 hücresindeki değeri sayfa 2 deki 1 süz e
sayfa 1 a2 hücresindeki değeri sayfa 2 deki 2 süz e

yolasın ve ben sayfa 2 ye geçtiğimde veriler o değere göre süzülmüş olsun.

 

[Mahmut Bayram]

Valla sayfayı kopyola bence

 

[Levent Menteşoğlu]

Anladığım kadarıyla aşağıdaki şekilde deneyin. Burada sayfa1 A11 aralığındaki süzme işleminin kriteri sayfa2 A1 hücresinden alınmaktadır.

[vb:1:c010d617f8][a1:d1].AutoFilter Field:=1, Criteria1:=Sheets("sayfa2").[a1][/vb:1:c010d617f8]

 

[recep]

tekekür kod işime çooooook yaraadı tam istediğim şeyı yapıyor
Sheets("sayfa1").[a1:d1].AutoFilter Field:=1, Criteria1:=Sheets("sayfa2").[a1]
şeklinede yapınca başka sayfada bile olsam işlemi sayfa2 de yapıyor. :hey:

 

[oziyilmaz]

Anladığım kadarıyla aşağıdaki şekilde deneyin. Burada sayfa1 A11 aralığındaki süzme işleminin kriteri sayfa2 A1 hücresinden alınmaktadır.


visual basic kodu:

[a1:d1].AutoFilter Field:=1, Criteria1:=Sheets("sayfa2").[a1]

levent beyin kodu mükemmel bir şekilde çalışıyor. ben bir ek isteyebilirmiyim bu koda acaba.tüm sayfalar için nasıl genişletebilirim?

[l1:l999].AutoFilter Field:=1, Criteria1:=Sheets("sayfa1").[a1]
[l1:l999].AutoFilter Field:=1, Criteria1:=Sheets("sayfa2").[a1]

şeklinde yapıp ana bir sayfadan bir butona bağlayarak tüm sayfaları süzmek istedim ama olmadı. kod aktif sayfadaysa ve o sayfa ile ilgili kod mevcutsa çalışıyor. :yardim: