Merhaba,
Listbox taki verileri Textbox a girilenlere göre süzmek istiyorum. Daha önceden oluyordu ama bugün yapamadım.
Private Sub UserForm_Initialize()
Call Baglanti_Yap
Set Kayit = CreateObject("adodb.recordset")
S = "SELECT KOD, EBLK, YBLK, DAI, ADSOYAD, TCKN FROM [DATA$] ORDER BY KOD" >>>> Kodu çalıştırdığımda "Tür uyuşmazlığı" diye hata veriyor.
Kayit.Open S, Baglan, 1, 2
If Kayit.RecordCount > 0 Then
Bu konuda yardımcı olacak varsa sevinirim.
İyi çalışmalar.
Listbox taki verileri Textbox a girilenlere göre süzmek istiyorum. Daha önceden oluyordu ama bugün yapamadım.
Private Sub UserForm_Initialize()
Call Baglanti_Yap
Set Kayit = CreateObject("adodb.recordset")
S = "SELECT KOD, EBLK, YBLK, DAI, ADSOYAD, TCKN FROM [DATA$] ORDER BY KOD" >>>> Kodu çalıştırdığımda "Tür uyuşmazlığı" diye hata veriyor.
Kayit.Open S, Baglan, 1, 2
If Kayit.RecordCount > 0 Then
Bu konuda yardımcı olacak varsa sevinirim.
İyi çalışmalar.