• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

Çözüldü Listwiev arama kodunda değişiklik hk

  • Konuyu Başlatan Konuyu Başlatan himmgarip
  • Başlangıç tarihi Başlangıç tarihi
  • Görüntülenme 833
Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

himmgarip

Excel Dostu
Katılım
27 Mar 2021
Mesajlar
797
Çözümler
96
Aldığı beğeni
884
Excel V
Office 2016 TR
Konu Sahibi
Merhaba,

Aşağıdaki kod satırında bulunan [ADI] yerine değişken atayabiliyor muyuz acaba?

Örneğin aranan adı altında genel bir değişken tanımladık.
Comboboxtan A seçersem aranan= [ADI] / B seçersem aranan= [SOYADI] olsun gibi.

Ek olarak bu kod ile arama yaparken satırda ki bir hücre boşsa sağındaki dolu hücreyi onun yerine kaydırıyor. Bunun çözümü var mıdır?


Set rs = con.Execute("select * from [Sayfa1$] where [aranan] like '" & UCase(Replace(Replace(Me.txt_ara.Text, "ı", "I"), "i", "İ")) & "%'")

HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Çözüm
Merhaba,

Aşağıdaki kod satırında bulunan [ADI] yerine değişken atayabiliyor muyuz acaba?

Örneğin aranan adı altında genel bir değişken tanımladık.
Comboboxtan A seçersem aranan= [ADI] / B seçersem aranan= [SOYADI] olsun gibi.

Ek olarak bu kod ile arama yaparken satırda ki bir hücre boşsa sağındaki dolu hücreyi onun yerine kaydırıyor. Bunun çözümü var mıdır?


Set rs = con.Execute("select * from [Sayfa1$] where [aranan] like '" & UCase(Replace(Replace(Me.txt_ara.Text, "ı", "I"), "i", "İ")) & "%'")

HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
Merhaba,

Aşağıdaki kod satırında bulunan [ADI] yerine değişken atayabiliyor muyuz acaba?

Örneğin aranan adı altında genel bir değişken tanımladık.
Comboboxtan A seçersem aranan= [ADI] / B seçersem aranan= [SOYADI] olsun gibi.

Ek olarak bu kod ile arama yaparken satırda ki bir hücre boşsa sağındaki dolu hücreyi onun yerine kaydırıyor. Bunun çözümü var mıdır?


Set rs = con.Execute("select * from [Sayfa1$] where [aranan] like '" & UCase(Replace(Replace(Me.txt_ara.Text, "ı", "I"), "i", "İ")) & "%'")

HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
Aranan=ComboBox1.Value
"select * from [Sayfa1$] where [" & Aranan & "] like '" & UCase(Replace(Replace(Me.txt_ara.Text, "ı", "I"), "i", "İ")) & "%'"
denemedim ama bu şekilde olabileceğini düşünüyorum
 
Çözüm
Konu Sahibi
İlk sorumuzun cevabını aldık teşekkürler.

İkinci sorum şu idi;

Kod ile arama yaparken satırda ki bir hücre boşsa sağındaki dolu hücreyi onun yerine kaydırıyor. Bunun çözümü var mıdır?



HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
2.Mesajdaki gibi IIf kullanın.

 
Konu Sahibi
Teşekkürler arkadaşlar.
 
Ricz ederiz.Aslında Adoda harf duyarlılığı yok yani ucase ye gerek yok esaen.
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst