Hücre içerisinden birden fazla kelimeyi arama

[Ewoshadow]

Merheba,

Kendime bir pdf arama sistemi yapmak istiyorum, Bu konuda yeni olsam da şimdilik basit, kendime yetecek bir şeyler çıkardım ortaya ama arama kısmında sorun yaşıyorum,

Şöyle bir listem var; (foto yükleyemedim pardon)

http://s3.dosya.tc/server14/gdnggj/arama_kismi.png.html

Şöyle de bir arama kısmı yaptım;

http://s3.dosya.tc/server14/79brf8/Ana_sayfa_site.png.html

Şimdi sorunum şu hücreler halinde veriler yazılı örn; [Adı soyadı]-- [ X adı vs.] gibi, Bunlarda şöyle yazdığı düşünelim, [Ahmet Mehmet]--[Türkiye Almanya Fransa] Listemiz bu;

Gelişmiş filtreleme ve ufak bir makro ile bu listeden, arama kısmına yazılan adı soyadı, kelimeyi hatta harfi arayabiliyorum ve arama kısmının sutun olarak tüm bilgilerini getirebiliyorum. Aynı hücre içerisinde [Türkiye] aramam doğru sonuç veriyor, [Türkiye Almanya] yazar ve ararsam doğru sonuç alıyorum ancak [Türkiye Fransa] olarak ararsam sonuç vermiyor sistem. Arada Almanya olması yada ufak bir virgül konulması sistemi bozuyor ve arama çalışmıyor.

Başka bir örnek; Yayın yeri adlı bir hücremiz var burada makalelerin yayınlandıkları yerler yazıyor. Örn; [MASROP Volume 24 ] Bu aramada Masrop yazarsam doğru sonucu alıyorum, 24 yazarsam doğru sonucu alıyorum Volume yazarsam doğru sonuç alıyorum ancak masrop 24 olarak arattığım zaman aradaki volume yüzünden sonuç yanlış oluyor ve bana sutunları göstermiyor.

Bu hatanın önüne nasıl geçebilirim ? Var mıdır bir çözümü ? Lütfen yardım edin.:???:

Dosya : http://s3.dosya.tc/server14/iygyal/Siteye_gonderilecek.rar.html

 

[Ömer BARAN]

Merhaba.

One Drive dışında (bunu kullanmayan ama destek olmayı düşünen üyeler olabilir),
cevabımın altında ikisinin adresini örnek olarak verdiğim, bir dosya paylaşım sitesine,

gerçek belgenizin (özel bilgi içermeyecek şekilde) küçük boyutlu bir kopyası şeklinde hazırlayacağınız bir örnek belge yükleyerek
oradan alacğınız erişim bağlantı adresini forumda paylaşırsanız çözüm önerisi gelecektir.

Ayrıca varsa belgenizdeki formüller/userform ve buna ait kodlar da (en azından konuyla ilgili olabilecek kısımları) örnek belge içerisinde ve çalışır durumda olsun.

Kolay gelsin.
.

 

[alicimri]

Türkiye*Fransa şeklinde, arasına "*" işareti koyup, filtreleme yaparsanız Türkiye ile Fransa nın arasında hangi kelime veya karakter olursa olsun doğru sonuç verir.

 

[Ewoshadow]

Pardon, Söylediğiniz gibi düzelttim mesajımı. Kullandığım excel dosyasını da alt tarafa link olarak koydum, Orjinal isimleri kullanmadım, bu yüzden biraz farklı gelebilir gözünüze kusura bakmayın.

 

[Ewoshadow]

Cevabınız için çok teşekkür ederim. Aslında sizin dediğiniz gibi bir kod yazdım. Kullanıcı arama kısımına ne yazarsa yazsın Eğer fonksiyonu ile önüne ve arkasına * koymasını sağladım. Ancak kullanıcı space kullanarak yazdığı zaman ortaya şöyle bir şey çıkıyor. [*Türkiye Fransa*] Kullanıcının bıraktığı boşluğa nasıl * yazdırabilirim bu konuda aklıma bir şey gelmedi. Bu konuda yardım edebilirseniz sevinirim.

Ayrıca dediğiniz gibi [*Türkiye*Fransa*] yazılırsa sonuç doğru oluyor. Aydınlatıcı bilginiz için ayrıca teşekkür ederim.

 

[Ewoshadow]

Türkiye*Fransa şeklinde, arasına "*" işareti koyup, filtreleme yaparsanız Türkiye ile Fransa nın arasında hangi kelime veya karakter olursa olsun doğru sonuç verir.

Dediğiniz gibi "*" koyma işlemini YERİNEKOY formulü ile yaptım ve [Türkiye Almanya Fransa] listesinden [Türkiye Fransa] aradığım zaman doğru sonuç almaya başladım.

Ancak şu an da [Fransa Türkiye] yada [Almanya Türkiye] gibi sırasını farklı yazdığım zaman arama sonuç vermiyor. Bu konuda ne yapabilirim?

 

[alicimri]

Link te dosya yok ama yine afaki cevap yazayım

Replace("*Türkiye Fransa*", " ", "*")

 

[alicimri]

Acele ettim kusura bakmayın, cevabı sildim, biraz daha deneyeyim.

 

[Orion1]

............

 

[alicimri]

Sn Orion1
Tek başına o seçenekler olunca sonuç veriyor ama arkadaşın anladığım kadarıyla süzme işlemi öyle olacak ki aynı süzme işlemi içinde hem FransaAlmanya hemde AlmanyaFransa yı birden süzecek ama Fransa veya Almanya tek kelime olunca süzmeyecek.

 

[alicimri]

Aşağıdsaki gibi oluyor herhalde

ActiveSheet.Range("$A$1:$A$10").AutoFilter Field:=1, Criteria1:=Array("*Fransa*Almanya*", "*Almanya*Fransa*"), Operator:=xlFilterValues

 

[Orion1]

Aşağıdsaki gibi oluyor herhalde

ActiveSheet.Range("$A$1:$A$10").AutoFilter Field:=1, Criteria1:=Array("*Fransa*Almanya*", "*Almanya*Fransa*"), Operator:=xlFilterValues

Evet,bu yazdığınız bencede olmalı.

 

[Ewoshadow]

Link te dosya yok ama yine afaki cevap yazayım

Replace("*Türkiye Fransa*", " ", "*")

Dosyayı ekledim bi sorun olmuş, tekrar deneyin lütfen

 

[Ewoshadow]

Sn Orion1
Tek başına o seçenekler olunca sonuç veriyor ama arkadaşın anladığım kadarıyla süzme işlemi öyle olacak ki aynı süzme işlemi içinde hem FransaAlmanya hemde AlmanyaFransa yı birden süzecek ama Fransa veya Almanya tek kelime olunca süzmeyecek.

sanırım yanlış anlaşıldım yada ben yanlış anladım. Şöyle tekrar açıklayayım;

[Türkiye, Almanya, Fransa] Liste;

[tür] [Türkiye] [Almanya] [Fransa] [Türkiye Almanya][Türkiye Fransa] [Fransa Türkiye] [Fransa Almanya Türkiye] gibi yapılabilecek tüm aramaların aynı sonucu yani listeyi göstermesini istiyorum [Türkiye Fran] [Fran Türk] gibi eksik yazılsa bile aynı sonuca ulaşmak istiyorum, ctrl F gibi çalışmasını istiyorum yani. Umarım açıklayıcı olmuşumdur.

 

[Ewoshadow]

[Türkiye, Almanya, Fransa] Liste

[tür] [Türkiye] [Almanya] [Fransa] [Türkiye Almanya][Türkiye Fransa] [Fransa Türkiye] [Fransa Almanya Türkiye] gibi yapılabilecek tüm aramaların aynı sonucu yani listeyi göstermesini istiyorum [Türkiye Fran] [Fran Türk] gibi eksik yazılsa bile aynı sonuca ulaşmak istiyorum, ctrl F gibi çalışmasını istiyorum yani. Umarım açıklayıcı olmuşumdur.

Şuan "alicimri" arkadaşın yardımı ve Yerinekoy fonksiyonu ile liste sırasına göre giden tüm aramaları buluyorum. yarım yazsam bile doğru sonucu veriyor çünkü harf bazında arıyor. Şuan çalışmayan kısım listede son yazılanı öne aldığım zaman sanırım listede aranan harfi yada sözcüğü bulduktan sonra geri dönüp baştan aramıyor ve bulduğu cümlenin devamına bakıyor. Bu da Örn; [F Tür] gibi bir arama yaptığımda [F] yi yani [Fransa] yı buluyor ve F nin devamında [Tür] ü arıyor. Doğal olarak da devamında Tür ü bulamadığı için sonucu doğru vermiyor. Sanırım aramayı tamamında tekrar yaptırabilirsek sorun çözülecek.

 

[alicimri]

Dosyanıza baktım ne yapmak istediğinizi kavrayamadım. Bu filtreleme işlemi ile fazla karışık işler yapılabilir mi? Yapmak istediğinizi filtrelemeyi hiç karıştırmadan açıklarsanız daha rahat sonuca ulaşırsınız.

 

[Zeki Gürsoy]

Çözüm "Regular Expression" gibi görünüyor.

 

[Ewoshadow]

Dosyanıza baktım ne yapmak istediğinizi kavrayamadım. Bu filtreleme işlemi ile fazla karışık işler yapılabilir mi? Yapmak istediğinizi filtrelemeyi hiç karıştırmadan açıklarsanız daha rahat sonuca ulaşırsınız.

kısaca yapmak istediğim şey belirlediğim kriterlere göre kitap yada makalelerin özelliklerini yazmak ve bunlar listelemek, listeden ufak bir arama motoru ile değişken olan arama metinleri ile listeyi aramak ve uygun sonuçların önüme dökülmesini sağlamak. Bir kütüphane sistemi gibi. Aslında düşündüğüm şeyler zor da olsa büyük bir kısmını başardım. Aramalarım doğru sonuç veriyor ve liste istediğim gibi önüme geliyor. Sadece üstte anlattığım gibi aranacak olan değişken; listede, hücre içerisine yazılış sırasına göre arıyor bu da bazı aramalarımda sonuca ulaşmamı engelliyor. Tüm sorunum bu. karışık anlattıysam özür dilerim. yine anlaşılmayan kısımlar onursa uzun uzun anlatırım.

 

[Ewoshadow]

Çözüm "Regular Expression" gibi görünüyor.

cevabınız için teşekkür ederim ama "Regular Expression" konusunda hiçbir fikrim yok ama araştırıp öğrenmeyi deneyeceğim.

 

[Ömer BARAN]

Merhaba.

Biraz etrafından dolaşarak oldu ama, (veri yığınının yoğunluğuna göre işlem hızına bir şey diyemiyorum)
sayfadaki SEARCH düğmesiyle aşağıdaki kod'u ilişkilendirerek dener misiniz?

İşlem için kullanılacak kod 34 numaralı cevapta.

.