Çözüldü Ado ile Listboxa çekilen Kayıtları A-Z sıralamak.

Bu sorun verilen destek sayesinde çözüme ulaştırılmıştır.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

OğuzTürkyılmaz

Yeni Üye
Kullanıcı Bilgileri
Katılım
12 Eyl 2021
Mesajlar
263
Çözümler
1
Aldığı beğeni
30
Excel Versiyonu
Office 365 TR
Konuyu Başlatan
Merhaba Herkese sağlıklı günler dilerim.
Uygulamada Ado ile Listboxa kayıtları çekiyorum. Listboxta arama yaptığımda gelen kayıtların A-Z ye sıralı gelmesi için SQL sorgu cümlesine nasıl bir kriter eklemeliyim. Yardımlarınız için Teşekkür ederim.
 

Ekli dosyalar

  • 1.png
    1.png
    40 KB · Gösterim: 10
  • 2.png
    2.png
    12.5 KB · Gösterim: 9
  • ADO listbox isim a-z.xlsb
    49.8 KB · Gösterim: 10

halily

Destek Ekibi
Kullanıcı Bilgileri
Katılım
29 Ağu 2021
Mesajlar
1,915
Çözümler
258
Aldığı beğeni
1,878
Excel Versiyonu
Office 2019 TR
Sorguya order by [isimalanı] gibi bir kod eklediniz mi?
 

OğuzTürkyılmaz

Yeni Üye
Kullanıcı Bilgileri
Katılım
12 Eyl 2021
Mesajlar
263
Çözümler
1
Aldığı beğeni
30
Excel Versiyonu
Office 365 TR
Konuyu Başlatan

Ekli dosyalar

  • Screenshot_1.png
    Screenshot_1.png
    12.8 KB · Gösterim: 4

OğuzTürkyılmaz

Yeni Üye
Kullanıcı Bilgileri
Katılım
12 Eyl 2021
Mesajlar
263
Çözümler
1
Aldığı beğeni
30
Excel Versiyonu
Office 365 TR
Konuyu Başlatan

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,213
Çözümler
502
Aldığı beğeni
3,949
Excel Versiyonu
Office 2021 TR
Private Sub TextBox_Kriter_Change() bu kod içinde ado olmadığı için sıralamıyor abey :)
 

Özcan ÖZBEK

Yeni Üye
Kullanıcı Bilgileri
Katılım
25 Nis 2021
Mesajlar
84
Çözümler
16
Aldığı beğeni
99
Excel Versiyonu
Office 2021 TR
Sub PersonelVerileriniGetir()

rs.Open "select * from [Personel$] order by ([adi])", con, 1, 3

Bu şekilde yapıp dener misiniz.
1669843945721.png
 

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,213
Çözümler
502
Aldığı beğeni
3,949
Excel Versiyonu
Office 2021 TR
Combobox olduğu için select case ekledim gerisini devam edebilirsiniz.


C#:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 

halily

Destek Ekibi
Kullanıcı Bilgileri
Katılım
29 Ağu 2021
Mesajlar
1,915
Çözümler
258
Aldığı beğeni
1,878
Excel Versiyonu
Office 2019 TR
Refaz hocam bilgisaya olmadığından inceleyemiyorum ama kodunuzdan anladigim kadarıyla case e gerek yok gibi
Dogrudan comboya atıf yeterli sanki
CSS:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
"
 

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,213
Çözümler
502
Aldığı beğeni
3,949
Excel Versiyonu
Office 2021 TR
Refaz hocam bilgisaya olmadığından inceleyemiyorum ama kodunuzdan anladigim kadarıyla case e gerek yok gibi
Dogrudan comboya atıf yeterli sanki
CSS:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
"
Haklısınız abey :)
Aslında select case aklıma şundan gelmişti.Sütun başlığında kodu yazıyordu ilk başta sayısal olduğunu düşünüp tek tırnak eklenmeyecek diye düşünmüştüm.
 

OğuzTürkyılmaz

Yeni Üye
Kullanıcı Bilgileri
Katılım
12 Eyl 2021
Mesajlar
263
Çözümler
1
Aldığı beğeni
30
Excel Versiyonu
Office 365 TR
Konuyu Başlatan
Sub PersonelVerileriniGetir()

rs.Open "select * from [Personel$] order by ([adi])", con, 1, 3

Bu şekilde yapıp dener misiniz.
Ekli dosyayı görüntüle 13678
Merhaba 4 no'lu mesajda sıralattığımı söylemiştim sizin de yaptığınız gibi, çalışan kodu yüklemişim yanlışlıkla. Textboxın change olayı gerçekleştiğinde çıkan sonuçlarda sıralama yapmıyordu. İlginiz için çok teşekkür ederim.
 

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,213
Çözümler
502
Aldığı beğeni
3,949
Excel Versiyonu
Office 2021 TR
Çözüm
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

Konuyu okuyanlar

Üst