bahsettiğim kod eğer form bir tablo işe ilişkili ise geçerli
mesela aşağıdaki kod form tabloyla ilişkilendirdiğimde çalışıyor

Me.OrderBy = "urun desc"

Me.OrderByOn = True

liste kutusu için önereceğim yöntem

Private Sub SiralaAZ_Click()

Dim LstBx, LstBxOrder As String

LstBx = "SELECT tblgelenmal.id, tblgelenmal.urun, tblgelenmal.gelisadet, tblgelenmal.gelisfiyati, tblgelenmal.gelistarihi, tblgelenmal.satisadet, tblgelenmal.satisfiyati " & _

        "FROM tblgelenmal "

LstBxOrder = "ORDER BY tblgelenmal.urun; "



Liste_ürün.RowSource = LstBx & LstBxOrder



End Sub

Private Sub SiralaZA_Click()

Dim LstBx, LstBxOrder As String

LstBx = "SELECT tblgelenmal.id, tblgelenmal.urun, tblgelenmal.gelisadet, tblgelenmal.gelisfiyati, tblgelenmal.gelistarihi, tblgelenmal.satisadet, tblgelenmal.satisfiyati " & _

        "FROM tblgelenmal "

LstBxOrder = "ORDER BY tblgelenmal.urun desc; "



Liste_ürün.RowSource = LstBx & LstBxOrder

End Sub

---

LstBxOrder değerini alana ve sıralamaya göre değiştirebilirsiniz

---

(18/07/2020, 12:04)yahzee_61 yazdı: kodu order by araştırırken buldum uygulamaya çalıştım. bu arada sizin kodu denedim sıralama çalışmadı. liste içinde sorgu alanının ismini yazıyorum.

isterseniz bahsettiğiniz çalışmayı ekleyin inceleyelim