tek işlemde iki değeri süzebilme

[Erdem Akdemir]

ekteki dosyada dost ve bloke kelimesini içeren açıklamaları birlikte nasıl süzebilirim.

bu kodu denedim ama olmadı

Sub süz()


Range("A2").AutoFilter Field:=2, Criteria1:="=*dost*", Operator:=xlAnd, Criteria2:="=*bloke*", _
Operator:=xlAnd
End Sub

 

[Orion1]

Size bir püf noktası vereyim.Çalışma sayfası üzerinde yapacağınız işlemleri makro kaydet yöntemi ile makro olarak hazırlayabilirsiniz.Bu yöntemi bilmiyorsanız araştırınız.
İşte size makro kaydet yöntemi ile oluşturmuş olduğum hazır makro.

Sub Makro1()
'
' Makro1 Makro
' Makro aaa tarafından 05.02.2009 tarihinde kaydedildi.
'

'
    Range("B1").Select
    Selection.AutoFilter
    Selection.AutoFilter Field:=2, Criteria1:="=*dost*", Operator:=xlOr, _
        Criteria2:="=*bloke*"
End Sub

 

[Erdem Akdemir]

Size bir püf noktası vereyim.Çalışma sayfası üzerinde yapacağınız işlemleri makro kaydet yöntemi ile makro olarak hazırlayabilirsiniz.Bu yöntemi bilmiyorsanız araştırınız.
İşte size makro kaydet yöntemi ile oluşturmuş olduğum hazır makro.

Sub Makro1()
'
' Makro1 Makro
' Makro aaa tarafından 05.02.2009 tarihinde kaydedildi.
'

'
    Range("B1").Select
    Selection.AutoFilter
    Selection.AutoFilter Field:=2, Criteria1:="=*dost*", Operator:=xlOr, _
        Criteria2:="=*bloke*"
End Sub

kaydetmek aklıma geldi ama genelde yazarak ulaşmayı istiyorum, operatörü yanlış seçmişim

yardım için sağolun

 

[Orion1]

kaydetmek aklıma geldi ama genelde yazarak ulaşmayı istiyorum, operatörü yanlış seçmişim

yardım için sağolun

Rica ederim.
İyi çalışmalar.

 

[Erdem Akdemir]

evren hocam bu makroda sadece 2 kere kriter verilebiliyor

3.bir kriteri nasıl eklerim, aşağıdaki kodu denedim hata verdi

Sub suz()

Range("B1").AutoFilter Field:=2, Criteria1:="=*dost*", Operator:=xlOr, _
Criteria2:="=*bloke*", Operator:=xlOr, Criteria3:="=*yatan*"

End Sub

 

[Orion1]

Gelişmiş süzgeçi uygulayınız.

 

[Erdem Akdemir]

Gelişmiş süzgeçi uygulayınız.

kendimiz bir süzme nesnesi tanımlayamazmıyız

userform'lada birleştirerek

classmodule'de bu işlem olabilir mi ?

 

[Orion1]

Süzme nesnesi olarak neyi kullancaksınız?
Bu konuda bir fikrim yok.
Hazırda gelişmiş süzgeç var.

 

[Erdem Akdemir]

Süzme nesnesi olarak neyi kullancaksınız?
Bu konuda bir fikrim yok.
Hazırda gelişmiş süzgeç var.

userform açılacak ve ordan

1.kriter
2.kriter diye devam edecek

tam olarak düşündüğüm

userform çalışınca sadece 1 tane textbox gelecek

1.textbox'ı doldurunca, otomatik olarak 2.textbox oluşacak, onuda doldurunca 3. oluşacak ve böylece devam edecek

textboxların yanında kriter bölümününde olması lazım

benim bazı sayfalarımda 15000'e yakın satır var, böyle bir forma ihtiyacım var

gelişmiş süzgeç bu anlamda işimi görmez

 

[Erdem Akdemir]

bir kerede üç değeri süzebilirmiyim

ustalar bu konuya bir el atsanız.