ara bul getir

[sevensuleyman]

merhaba; sayfa2 de veriler arama sayfa 1 deki arama kısmına yazdımızda stok adı geçenler getirmesini istiyorum. stok adı örnek oalrka toyota far veya far toyata yazdıgımdada gelmeli desteiğinizi rica ederim şimdfiden teşekkürler

 

[Mdemir63]

Selamlar

inceleyiniz

 

[sevensuleyman]

Selamlar

inceleyiniz

hocam teşekkürler ilgilendiğiniz için fakat Şuan ürünü getirmesi için stokadını tam olarka yazmam gerekiyor. "STOKADI1" ürünü getirmek için "ADI1" yazdıgımdada getirmesi için o şekilde düzenleyebilirsrniz çok seviniriim.

 

[Mdemir63]

Selam

deneyiniz

 

[sevensuleyman]

Selam

deneyiniz

merhaba ; hocam yanlış anlattıysan kusura bakmayın... stok adı aradıgım kelime hücre içerisinde geçiyorsa hertürlü getirmesini istiyorum. "STOKADI1" verisini getirmek için "adı1","adı","stok" gibi kelimler yazdıgımda içinder geçen tüm verileri getirmeli. birden fazla olan kelimlerde bile kelimler yazılış sırası değişse bile veriyi gietirmeli =örnek olarak "toyota corolla far " verisi var arama hücresine "far corolla","toyota far","corol far","toy far","far toy" şeklinde her arama yaptıgımda verileri getirebilmeli

 

[walabi]

Yani metin içinde kelime arayarak aranan kelimenin geçtiği tüm stok satırları listelenmek isteniyor.

"*" & aranan & "*" bu şekilde bir tanımlama gerekiyor sanırım. Ya da Like kullanımı özelliği .

 

[sevensuleyman]

Yani metin içinde kelime arayarak aranan kelimenin geçtiği tüm stok satırları listelenmek isteniyor.

"*" & aranan & "*" bu şekilde bir tanımlama gerekiyor sanırım. Ya da Like kullanımı özelliği .

evet doğru kelime yerler ifarklılık gösterebiliyor. sql bağlantılı kullandıgım bir kod var aslında ama nası luyarlanacagını bilmediğim için yapamıyorum. daha önce bu kod uayrlanmıstı

xString = Sayfa8.Range("D3")
xAyrac = " "
xAlan = "STOK_ADI"
If Len(xString & "") > 0 Then
    xString = xAyrac & xString
    xKriter = " AND " & Mid(Replace(xString, xAyrac, "%') and " & xAlan & " like DBO.TR2UNC(N'%") & "%' ) ", 8)
End If

 

[walabi]

Merhaba, eklediğim dosyayı dener misiniz. Sanırım istediğiniz gibi sonuç veriyor.

 

[Mdemir63]

Selam
deneyiniz

 

[walabi]

Dosyada bir ekleme yaptım. Şöyleki Stok No ve Stok Adı içeren bir listeniz var. Aklıma şu geldi. Bunu bazen stok adına göre listelemek isteyebileceğiniz gibi bazen de stok numarasına göre listelemek isteyebilirsiniz. İstendiği zaman ada göre , istendiği zaman numaraya göre arama yapıp listeleyebileceğiniz şekilde ayarladım dosyayı. Sadece şunun yapılması gerekiyor. Sorgu adlı sayfada D1 hücresine 1 ya da 2 yazılması yeterli.
1 >> 1. sütun yani Stok No anlamında, A sütunu,
2 >> 2. sütun yani Stok Adı anlamında , B sütunu

Toplamda 27 sütundan oluşuyor liste. 27 ye kadar benzeri şekilde kullanılabilir, Metinsel ifadeler için.

 

[sevensuleyman]

teşekkürler . aşagıdaki durumuda çözebilirsek sorunumuz kalmıyor

birden fazla olan kelimlerde bile kelimler yazılış sırası değişse bile veriyi gietirmeli =örnek olarak "toyota corolla far " verisi var arama hücresine "far corolla","toyota far","corol far","toy far","far toy" şeklinde her arama yaptıgımda verileri getirebilmeli

 

[walabi]

Bu dediğinizin yapılabilirliği hakkında bilgiye sahip değilim. Ancak şunu yazabilirim sanırım. Daha üst düzey VBA kodları ister diye düşünüyorum.

Siz şunu yapmak istiyorsunuz. Aranacak kelime ( metin ) olarak birden fazla kelime yazıp filtreleme aralığını daraltma amacındasınız sanırım.

Örneğin verileriniz şu şekilde ise;

STOK ADI

toyota corolla far

toyota corolla

toyota far

far

far toyota

ve arama yapacağınız hücreye şu şekilde yazarsanız, toyota*far aşağıdaki sonucu elde edersiniz.

STOK ADI

toyota corolla far

toyota far

Yani aramak istediğiniz kelimeler arasına * (çarpı) işareti koyarsanız bu filtrelenin daraltılmasını sağlar.

Burada dikkat edilmesi gereken kelimelerin dizilimi , toyota corolla far metininde toyota*far girdisini aratmanız sonuç verir. Ancak far*toyota şeklinde aratma sonuç vermez.

Bunun için daha farklı bir çözüm gerekiyor.