(14/01/2020, 00:02)berduş yazdı: accesste bir adı 2 defa kullanamazsınız diye biliyorum -yanılıyor olabilirim- kaldı ki burada "tarih" hem 2 defa kullanılmış hem de alan kendi üstüne döndüğü için kısır döngü oluşuyor

Evet ama yolladığınız dosyada

strSQL = "Select id,FORMAT(Tarih, 'dd.mm.yyyy') as Tarih,Ad,Soyad,Yas,format(Telefon,'(###) ### ## ##')as Telefon From Tablo1 where Not IsNull(id)"


şeklinde.

Berduş hocam şu olayı çözmemiz gerek % olayını

uygun bir zamanda inceleyemeye çalışacağım
Ama bende hata vermeyip sizde vermesi apayrı bir sorun
Gerçi benim dosyam da sorunlu ama hata uyarısı vermedi

Combolara veriler gelmiyor % olan kodları aktif edince dosyadaki.
Yoksa hata vermiyor kodlar.

(14/01/2020, 01:45)berduş yazdı: % kalkınca combolar düzgün mu?

Evet

% bunlar kalkınca içerik arama olmuyor onun yerine eşit olanlar listeleniyor.

% istememin sebebi içerisinde olarak kullanmak.

dilerim işinize yarar istediğiniz gibi sorgusuz yapmaya çalıştım
Değişenler:
1 - Aramada kullanılan 3 açılır kutunun otomatik genişlet  özelliklerini hayır yaptım
2 - Aramada kullanılan 3 açılır kutunun içeriğini bir biriyle ilişkilendirmek için CmbDldr adlı yeni bir fonksiyon tanımladım. bende düzgün çalıştı ama yine de garantisi yok)

Sub CmbDldr() '<--Eklendi

x = ActiveControl.SelStart

    ActiveControl.Value = ActiveControl.Text

    ActiveControl.SelStart = x



    strSQLCmb = " where Not IsNull(id)"

    

    If Len(Nz(cmboAdArama.Value, "")) > 0 Then strSQLCmb = strSQLCmb & " and Ad like '*" & cmboAdArama.Value & "*'"

    If Len(Nz(cmboSoyadArama.Value, "")) > 0 Then strSQLCmb = strSQLCmb & " and Soyad like '*" & cmboSoyadArama.Value & "*'"

    If Len(Nz(cmboYasArama.Value, "")) > 0 Then strSQLCmb = strSQLCmb & " and Yas like '*" & cmboYasArama.Value & "*'"



cmboAdArama.RowSource = "select distinct ad from Tablo1 " & strSQLCmb

cmboSoyadArama.RowSource = "select  distinct Soyad  from Tablo1 " & strSQLCmb

cmboYasArama.RowSource = "select  distinct Yas  from Tablo1 " & strSQLCmb

End Sub

3 - sorguyu sildim
4 - % yerine * kullandım

Akşama deneyebilirim.
Akşam olmasını sabırsızlanıyorum

Sqlde * like olarak kullanıldığını bilmiyordum kullanıncada hata veriyordu.
Koddaki NZ fonksiyonmudur.ilk defa görüyorum.

nz() eğer içerik boşsa varsayılan olarak değer atamakta kullanılır
Nz(AlanAd,"Burda değer yok")--> eğer AlanAd alanı boş ise "Burda değer yok" yazar Yalnız alan özellikleriyle uymlu olması gereken durumlar olabilir
mesela alan eğer sayısalsa ve gösterileceği metin kutusu da sayısalsa siz metin aktarmaya çalışırsanız sorun çıkabilir