Id yi büyük ten küçüğe listelemek

[Bilgemen]

Merhaba arkadaşlar. Aşağıdaki kodla Excel listboxa aldığım veri küçük ten büyüğe siralama yapıyorum. Peki bunun tam tersi olan büyükten küçüğe sıralama nasıl yapılır

Private Sub Siralaid()

Set baglan = CreateObject("adodb.connection")

Set rs = CreateObject("adodb.recordset")

Call baglanti

Rs.CursorLocation = adUseClient 'bu satır eklenince daha hızlı

Rs.Open "select * from [MusHareketleri] order by [Kimlik]",baglan, 3, 1

ListBox1.List.Clear

If rs.RecordCount > 0 Then

ListBox1.Column = rs.GetRows()

End If

Rs.Close: baglan.Close

 

[veyselemre]

Rs.Open "select * from [MusHareketleri] order by [Kimlik] DESC",baglan, 3, 1

 

[Bilgemen]

Teşekkürler Veyselemre kardeşim. Programım iş bilgisayarında ancak Pazartesi günü deneyebilicegim.

 

[Bilgemen]

Teşekkürler üstad eline sağlık