Çözüldü Excel filtre formülü hakkında

VetExc23' Alıntı:

10. Mesajda kod içerisinde Filtrenin soldan uzunluk ile ilgili bir formülünü yazmıştım onu denediniz mi

Genişletmek için tıkla...

Denemiştim ama formülü kendi çoğaltmıyor.

52779' Alıntı:

Selamlar,

Alternatif olarak,
Farklı bir yaklaşım olsun....
(Şahsen Ben, BUL ve MBUL işlevlerini NET olmadıktan sonra pek kullanmıyorum... Örneğin kara ibaresini arıyoruz, ama Ankara, makara, karanlık, karamsar...vs hepsinde kara mevcut. Belki de bunlar bizim aradığımız kara ile ilgili değil...)

Ben genelde PARÇAAL (MID) işlevini tercih ediyorum... EĞER Küçük-Büyük harf duyarlı ise de ÖZDEŞ (EXACT) işlevini PARÇAAL ile birlikte kullanıyorum...

Bu yönde bir dokuman hazırladım...

Ekli dosyayı görüntüle 3715

Burada,
İÇERİR (yani "*A*" ifadesi) için BUL ve MBUL işlevlerini kullandım... "*" gibi Joker karakter kullanmadım.
Diğer seçeneklerde ise, ya PARÇAAL(A2:A50;Seçime göre başlangıç No;1) (Burada 1 : Aranan ibarenin uzunluğu yani LEN(G1) ve o da 1 olduğundan 1 yazıldı) ya da ÖZDEŞ(PARÇAAL(A2:A50;Seçime göre başlangıç No;1)) işlevi kullanıldı... ELEMAN işlevi ise, Option Butonlar ile yapılan seçimlere karşılık gelen Parçaal daki Başlangıç No için kullanıldı.

Genişletmek için tıkla...

Önceki mesajda formül çalışıyor yazmıştım gifteki gibi DC yada Dc gibi yazınca çalışmıyor.

Refaz' Alıntı:

Denemiştim ama formülü kendi çoğaltmıyor.

Genişletmek için tıkla...

Ben telefondan deniyorum şimdi gayet iyi çalışıyor ama sende neden çalışmadı anlayamadım. Çalışma kitabını kapatıp açmayı dene bir de E1 in formatı metin olmalı.

VetExc23' Alıntı:

Ben telefondan deniyorum şimdi gayet iyi çalışıyor ama sende neden çalışmadı anlayamadım. Çalışma kitabını kapatıp açmayı dene bir de E1 in formatı metin olmalı.

Genişletmek için tıkla...

Gifte gösterdim abey 365 ve 2021 versiyonda formülü kendisinin çoğaltmasını ama sizinki çoğaltmıyor.

VetExc23' Alıntı:

Ben telefondan deniyorum şimdi gayet iyi çalışıyor ama sende neden çalışmadı anlayamadım. Çalışma kitabını kapatıp açmayı dene bir de E1 in formatı metin olmalı.

Genişletmek için tıkla...

Abey kusura bakmayın kafam karışmış evet o formül çalıştı kendini çoğalttı

Alttaki gibi kodunuz başlıyorsa olarak çalıştı.İşten gelip deneyince kafa duman oldu



Alttaki de biten için.


İçerir olarakta alttaki formül.


Konuyu kilitleyeyim çözülmüşlere.

Aynen 10. mesajı uzun uzun yazınca kodlar arada kaldı pek görünmedi aynen yazdığım kodlar bunlar

VetExc23' Alıntı:

Aynen 10. mesajı uzun uzun yazınca kodlar arada kaldı pek görünmedi aynen yazdığım kodlar bunlar

Genişletmek için tıkla...

Aslında denemiştim çalışmıştı ama heralde diğer formülleri denerken arada kaynadı

Formülleri koda çevirip listbox ve textboxxta arama olarak basitçe örnek hazırladım ihtiyacı olan olursa diye.
Bağlanlılı birden fazla textbox ve comboboxlarla yapıncada eklerim.Kodlarda ne döngü var nede gıcık Ado

Selamlar,
Kendi açımdan, mesajıma verdiğiniz yanıtı cevaplamak isterim....

Refaz' Alıntı:

Önceki mesajda formül çalışıyor yazmıştım gifteki gibi DC yada Dc gibi yazınca çalışmıyor.

Genişletmek için tıkla...

Çalışmaması gayet NORMAL....

DC yada (dc) yazdığınızda 2 karakter vardır. Açıklamamda belirtmiştim.

52779' Alıntı:

Burada,
İÇERİR (yani "*A*" ifadesi) için BUL ve MBUL işlevlerini kullandım... "*" gibi Joker karakter kullanmadım.
Diğer seçeneklerde ise, ya PARÇAAL(A2:A50;Seçime göre başlangıç No;1) (Burada 1 : Aranan ibarenin uzunluğu yani LEN(G1) ve o da 1 olduğundan 1 yazıldı) ya da ÖZDEŞ(PARÇAAL(A2:A50;Seçime göre başlangıç No;1)) işlevi kullanıldı... ELEMAN işlevi ise, Option Butonlar ile yapılan seçimlere karşılık gelen Parçaal daki Başlangıç No için kullanıldı.

Genişletmek için tıkla...

I2 hücresinde

=FİLTRE(A2 : A50;ELEMAN(F4;EĞER(F8=3;ESAYIYSA(BUL(G1;A2:A50));ÖZDEŞ(G1;PARÇAAL(A2:A50;ELEMAN(F8;1;4;;2;3;3;2);1)));EĞER(F8=3;ESAYIYSA(MBUL(G1;A2:A50));G1=PARÇAAL(A2:A50;ELEMAN(F8;1;4;;2;3;3;2);1))))

formülü yazmakta.... PARÇAAL kısımlarında da 1 yazmakta. Yani aranan Harf 1 karakter olduğu için 1 yazıldı.
Bu formülü aşağıdaki gibi genelleyebilirsiniz.... 1 yerine UZUNLUK(G1) yazarsınız.

=FİLTRE(A2 : A50;ELEMAN(F4;EĞER(F8=3;ESAYIYSA(BUL(G1;A2:A50));ÖZDEŞ(G1;PARÇAAL(A2:A50;ELEMAN(F8;1;4;;2;3;3;2);UZUNLUK(G1))));EĞER(F8=3;ESAYIYSA(MBUL(G1;A2:A50));G1=PARÇAAL(A2:A50;ELEMAN(F8;1;4;;2;3;3;2);UZUNLUK(G1)))))

Formülü I2 hücresine yazın.
Bu arada O2 de yazan formülde de 1 yerine UZUNLUK(G1) yazarak değişikliği yapmayı unutmayın.

Gelelim Dc ya da Dg yazdığınızda olanlara....

Listede Dc ve Dg olmadığından dolayı #HESAPLA Hatası verecektir....

Listede DC ile başlayan herhangi birini Dc olarak(yani DCBA31 yerine DcBA31), diğer herhangi birini de Dg olarak değiştirin (yani DCBA32 yerine DgBA32 yapın)... Sonra da aranana Dc yazın. (ve de Dg yazın)

Bakalım çalışacak mı?

Ekleme : 05.11.2021 02:06
Formüllerin sonucunda, aranan listede YOK ise ve de #HESAPLA hatası görünmesin istenilirse
I2 hücresine

ve O2 hücresine

formüllerini yazın....

52779' Alıntı:

=FİLTRE(A2 : A50;ELEMAN(F4;EĞER(F8=3;ESAYIYSA(BUL(G1;A2:A50));ÖZDEŞ(G1;PARÇAAL(A2:A50;ELEMAN(F8;1;4;;2;3;3;2);UZUNLUK(G1))));EĞER(F8=3;ESAYIYSA(MBUL(G1;A2:A50));G1=PARÇAAL(A2:A50;ELEMAN(F8;1;4;;2;3;3;2);UZUNLUK(G1)))))

Genişletmek için tıkla...

Bu formül çalıştı abey elinize sağlık.
Diğer formüller kısa olduğu için onları kullanacağım.
Ben vba koduna uyarlamak için formül istemiştim bu şekilde koda çevirmesi bayağı zor olacak
Önceki mesajdada yazdığım gibi düşündükleri uygularsam userformda son halini ekleyeceğim.

İki kritere göre aramada yani A ve B sütununa göre sğdan ve soldan olayında sonda yada başta rakam olunca hata veriyordu mesela e1&"" gibi yaparak çözdüm ama zaman olmdadığından dosyayı yükleyemedim.Eşittir olarakta unutulmuş hepsini ekleyeceğim akşam nasipse.Harika oldu sonuç

İhtiyacı olan olursa örnek olması açısından son hali ektedir.
Ama tam istediğim gibi pratik olamadı fazla sütunları filtrelemede.

Not:
Dosyalar 11.11.2021 tarihinde güncellendi kodddaki find yerine search eklendi küçük büyük harf duyarlılığı için.