Kod:
SELECT Tablo1.isim FROM Tablo1 GROUP BY Tablo1.isim ORDER BY sira([isim]);Kod:
Function sira(metin As String)
Dim ilk As String
ilk = Mid(metin, 1, 1)
sira = Asc(ilk)
If ilk = "Ç" Then sira = 67.5
If ilk = "Ğ" Then sira = 71.5
If ilk = "İ" Then sira = 72.5
If ilk = "Ö" Then sira = 79.5
If ilk = "Ü" Then sira = 85.5
sira = sira & Mid(metin, 2)
End Function