rs.Open "SELECT * FROM [ILACLAR] ORDER BY IIf(IsNumeric(Mid([ILAC_NO],1,1)),1,2), IIf(IsNumeric(Mid([ILAC_NO],1,1)),[ILAC_NO],Mid([ILAC_NO],3))*1;", Baglan, 1, 1 

Bu kod ile sayıları ve harf ile başlayan (A-109 gibi) sayıları sıralatabiliyorum.
101-A
101-B
101-C
101-D
101-E
101-F
ACL-200
LMC-001
KCC-201
gibi harf ile biten ve başında üç harf bulunan sayılar için bu çalışmıyor.Bu kodda nasıl revize yaparsam bu verdiğim sayılarıda sıralamaya sokabilirim.

Örneğinizi Ekleyiniz.

Örneğimi ilk mesaja ekledim.

İncelermisiniz...

Lütfen olumlu veya olumsuz geri dönüş yapınız...

Ufuk Bey ilginize teşekkür ederim lakin sıralama karışık geliyor.Vba kodunda sorgu2 demişsiniz ama sorguyu bulamadım.

Sıralamayı yaparak nasıl olması gerektiğini yazarmısınız...