• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Fİltreleme

  • Konbuyu başlatan Konbuyu başlatan erer
  • Başlangıç tarihi Başlangıç tarihi
Katılım
15 Ekim 2005
Mesajlar
9
Merhabalar

Aslında ekli dosyada sorunum daha net gözüküyor. Özetle, bir müşteri listem var ve içinde 3500 tane giriş var. Klasik filtrelemede sadece ilk 1000 adet müşteriyi süzebiliyorum. Bu adeti sınırsız yapmak mümkün mü?
 
Bir de makro kullanarak deneyin. Örneğin aşağıdaki gibi:

Sub SUZ()
[A:A].AutoFilter Field:=1, Criteria1:="1002"
End Sub
 
Alternatif.
Sub SUZ()
Menu = InputBox("süzülecek veriyi giriniz")
[A:A].AutoFilter Field:=1, Criteria1:=Menu
End Sub
 
filtreleme sorunu

yardımlarınız için teşekkürler, ancak benim sorunumu net olarak ekte görebilirsiniz. Eğer filtreleme açıldığında listede 1000 den fazla seçeneği görebilirsem işim hallolacak.
 
Siz 1000 satırdan fazlasını listede görmek istiyorsunuz. Fakat Excel (ben de yeni fark ettim.) 1000 satırdan fazlasını göstermiyor. Başka bir yolu var mı bimilyorum. Sayın ileriexcel 'in örneği tabii ki verileri bilmeniz kaydıyla, gayet kullanışlı.
 
®

Private Sub ComboBox1_Change()
TextBox1 = ComboBox1
End Sub

Private Sub TextBox1_Change()
[a1].Select
Selection.AutoFilter field:=1, Criteria1:=TextBox1
End Sub
Private Sub UserForm_Initialize()
[a1].Select
Selection.AutoFilter
ComboBox1.RowSource = "a1:a" & WorksheetFunction.CountA([a1:A65536])
End Sub
 
Merhabalar

Aslında ekli dosyada sorunum daha net gözüküyor. Özetle, bir müşteri listem var ve içinde 3500 tane giriş var. Klasik filtrelemede sadece ilk 1000 adet müşteriyi süzebiliyorum. Bu adeti sınırsız yapmak mümkün mü?

1000'den fazlasını göremezsiniz.

Şimdi burada bir yöntemden söz edeceğim.

Yöntemin mantığı verileri kategorize etmektir.

Kategorize sayısı bizim elimizde. Bunu Eğer formülü ile istediğimiz kadar yapabiliriz.


Bir yardımcı sütuna:

Eğer verilerimiz metin ise;


=IF(LEFT(B2;1)<"I";"A-H";IF(LEFT(B2;1)<"Q";"I-P";"Q-Z"))


E&#287;er verilerimiz say&#305; ise;

=IF(A2<=1000;1000;IF(AND(A2>1000;A2<=2000);2000;IF(AND(A2>2000;A2<=3000);3000;4000)))

form&#252;llerini yaz&#305;p, a&#351;a&#287;&#305;ya do&#287;ru kopyal&#305;yoruz. Daha sonra bu yard&#305;mc&#305; s&#252;tunlara g&#246;re s&#252;zme yapmam&#305;z m&#252;mk&#252;n olabiliyor.



IF=E&#286;ER
LEFT=SOLDAN
AND=VE
..
 
Son düzenleme:
Private Sub ComboBox1_Change()
TextBox1 = ComboBox1
End Sub

Private Sub TextBox1_Change()
[a1].Select
Selection.AutoFilter field:=1, Criteria1:=TextBox1
End Sub
Private Sub UserForm_Initialize()
[a1].Select
Selection.AutoFilter
ComboBox1.RowSource = "a1:a" & WorksheetFunction.CountA([a1:A65536])
End Sub

Sayın ileriexcel,

Süper paylaşımınız için teşekkürler...
 
bu program par&#231;ac&#305;&#287;&#305;n&#305; makroya m&#305; yapaca&#287;&#305;m nas&#305;l kullanaca&#287;&#305;m a&#231;&#305;klayabilir misiniz?
 
Arkadaşlar burda atachlar silinmiş. Tekrar eklenebilirmi veya bir örnek hazırlanabilirmi 10 tane yan yana sütunda hepsinin çeşitliliği 1000 i geçti nasıl aşabilirim acil.!
 
Bu örnekteki gibi nasıl yapabilirim.
 

Ekli dosyalar

Filitrelenen satirlarin toplanmasi

Selam Arkadaslar,

Filitreledigim satirlarin toplamini nasil gosteririm? Yani uzun bir listem var ama ben asagiya dogru hangi tarihler arasi filitre edersem sadece ekranda gorunen (filitrelenen) satirlarin toplaminii gormek istiyorum.

Bu nasil olur? bilgisi olan varmi?

Tesekkurler simdiden!!!
 
Selam Arkadaslar,

Filitreledigim satirlarin toplamini nasil gosteririm? Yani uzun bir listem var ama ben asagiya dogru hangi tarihler arasi filitre edersem sadece ekranda gorunen (filitrelenen) satirlarin toplaminii gormek istiyorum.

Bu nasil olur? bilgisi olan varmi?

Tesekkurler simdiden!!!

Alttoplam formülünü kullanın
 
Geri
Üst