Gelişmiş Filtre Uygulamak - Baskı Önizleme +- AccessTr.neT (https://accesstr.net) +-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html) +--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html) +--- Konu Başlığı: Gelişmiş Filtre Uygulamak (/konu-gelismis-filtre-uygulamak.html) |
Cvp: Gelişmiş Filtre Uygulamak - feraz - 02/04/2020 (02/04/2020, 21:29)yyhy yazdı: Sayın farez butonlara hazırlamış olduğunuz macroyu atadım. Macro tam istediğim gibi olmuş yalnız; 1774/Ek-6 -S.K.M. tiki ne tıkladığım zaman verileri normal filitre ediyor. TÜMÜ tiki ne tıkladığımda veriyi bir satır boşluk vererek getiriyor. Dosyayı ekliyorum bir daha bakabilir misiniz?Dosyayı unutmuşsunuz. Alttaki koddaki +1 i silip tümü olayı için deneyin.
Cvp: Gelişmiş Filtre Uygulamak - yyhy - 02/04/2020 Dosyayı ekliyorum. (+1 i sildim.)Kodları değiştirdim ama yine bir satır boş bırakıyor tümü nde. Cvp: Gelişmiş Filtre Uygulamak - yyhy - 02/04/2020 Sayın Farez bey veri sayfasında 2. satır boşmuş orayı doldurunca sorun halledildi. Teşekkür ederim. Ama örnek bir dosya var diye yazmışsınız eğer bulursanız eklerseniz sevinirim. İyi akşamlar ihtiyaca cevap verdi elleriniz dert görmesin tekrar teşekkürler. Cvp: Gelişmiş Filtre Uygulamak - feraz - 02/04/2020 (02/04/2020, 23:24)yyhy yazdı: Ama örnek bir dosya var diye yazmışsınızRica ederim dosya var derken o dosanın kodlarını uyarladım. Bu konu ile alakası ok aslında isterseniz onuda eklebilirim userformlu ve kendim için biraz gelişmiş olarak hazırlamıştım. Tümü için boş gelmesi sebebi veri = .Range("E4:P" & sonVeri).Value burdaki 4 ü 5 yaparsanızda sorun olmaz.ilk ekte 4.cü satır doludu hatırladığım. Ayrıca eğer veri sayfası E sütunu arasında boşluklar olmazsa alttaki koduda kullanabilirsiniz.
Yukardaki kodu ekledim öncekinden ReDim arr(1 To 12, 1 To UBound(veri, 1)) satırına kadar yerleri.
Cvp: Gelişmiş Filtre Uygulamak - feraz - 02/04/2020 Dediğim dosyada ekte.Eşittir,içerir,ilk karaktere,son karaktere göre gibi seçimler apılıyor. Cvp: Gelişmiş Filtre Uygulamak - yyhy - 03/04/2020 Emeğinize sağlık çok teşekkür ederim. Konu çözülmüştür. |