Access vakadan bağımsız olarak kayıtları artan veya azalan düzende sıralar. Ancak, birkaç satır Visual Basic for Applications (VBA) kodu yazarak metni ASCII karakter değerlerine göre sıralayabilirsiniz. ASCII değerlerine göre sıralama, büyük harflerle küçük harfleri ayırt ederek büyük/küçük harfe duyarlı sonuç verir.
Aşağıdaki tabloda Access’te artan sıralama düzeninin büyük/küçük harfe duyarlı sıralamadan nasıl farklılık gösterdiği ortaya konulur:
|
Ön sıralama düzeni |
Artan düzen |
Büyük/küçük harfe duyarlı düzen |
|---|---|---|
|
c |
a |
A |
|
D |
A |
B |
|
a |
B |
C |
|
d |
b |
D |
|
B |
c |
a |
|
C |
C |
b |
|
A |
D |
c |
|
b |
d |
d |
Artan düzen sütunundaki sonuçlar ilk başta bir miktar öngörülemez görünse de aslında böyle değildir. Artan düzen sütununda “a” “A”dan “B” ise “b”den önce görünür. Böyle olmasının nedeni, metin olarak değerlendirildiğinde ister küçük ister büyük harf olsun “A” = “a” ve “B” = “b”dir. Access değerlerin ilk düzenini dikkate alır. Ön-sıralama düzeni sütununda “a” “A”dan ve “B” “b”den önce gelir.
Büyük/küçük harfe duyarlı sıralama işleminde ASCII değerleri metin değerlerinin yerine geçer. Örneğin, A = 65, a = 97, B = 66, b = 98, vb.
VBA kodunu yazın
-
Bir VBA modülü oluşturun ve halihazırda orada değilse Bildirimler bölümüne aşağıdaki satırı yazın:
Option Explicit
-
Visual Basic Düzenleyicisi’nde bir modüle aşağıdaki yordamı yazın:
Function StrToHex (S As Variant) As Variant ' ' Converts a string to a series of hexadecimal digits. ' For example, StrToHex(Chr(9) & "A~") returns 09417E. ' Dim Temp As String, I As Integer If VarType(S) <> 8 Then StrToHex = S Else Temp = "" For I = 1 To Len(S) Temp = Temp & Format(Hex(Asc(Mid(S, I, 1))), "00") Next I StrToHex = Temp End If End FunctionDaha önceki bir kullanıcı tanımlı işlev olan StrToHex bir sorguyla çağrılabilir. Sıralama alanının adını bu işleve geçirirseniz alan değerleri büyük/küçük harfe duyarlı olarak sıralanır.
-
Şimdi bu işlevi çağıracağınız bir sorgu oluşturun.
Oluştur sekmesinin Sorgular grubunda Sorgu Tasarımı üzerine tıklayın.
-
Tablo Ekle (Access'te Tabloyu Göster) öğesini seçin.
-
Kılavuza almak istediğiniz alanları sürükleyin.
-
İlk boş sütunda Alansatırına Expr1: StrToHex([SortField]) yazın.
StrToHex, daha önce oluşturduğunuz kullanıcı tanımlı işlevdir. SortField, büyük/küçük harfe duyarlı değerler içeren alanın adıdır.
-
Sırala hücresinde Artan veya Azalan üzerine tıklayın.
Artan düzeni seçerseniz büyük harfle başlayan değer, küçük harfle başlayan değerden önce görüntülenir. Azalan düzende sıralama uygulaması ise bunun tam tersidir.
-
Veri Sayfası görünümüne geçin.
Access, kayıtları büyük/küçük harfe duyarlı düzende sıralanmış olarak gösterir.
