מיון רשומות בסדר תלוי-רישיות

הערה:  אנו מעוניינים לספק לך את תוכן העזרה העדכני ביותר במהירות האפשרית, בשפה שלך. דף זה תורגם באמצעות אוטומציה והוא עשוי לכלול שגיאות דקדוק או אי-דיוקים. מטרתנו היא כי תוכן זה יהיה שימושי עבורך. האם תוכל לספר לנו אם המידע הועיל לך, בחלק התחתון של דף זה? לנוחותך, הנה המאמר באנגלית .

Microsoft Office Access 2007 ממיין רשומות בסדר עולה או יורד ללא קשר לגודל רישיות. עם זאת, באמצעות כתיבת מספר שורות של קוד Visual Basic for Applications (VBA)‎, באפשרותך למיין טקסט לפי ערכי תווי ה- ASCII שלו. מיון לפי ערכי ASCII מבחין בין אותיות רישיות וקטנות, ותוצאתו סדר תלוי-רישיות.

הטבלה הבאה מדגימה כיצד סדר מיון עולה ב- Access שונה מסדר מיון תלוי-רישיות:

סדר לפני מיון

סדר עולה

סדר תלוי רישיות r

c

a

A

D

A

B

a

B

C

d

b

D

b

c

a

C

C

b

A

D

c

b

d

d

למרות שהתוצאות בעמודת הסדר העולה נראות בלתי צפויות, הן אינן כאלה. בעמודת הסדר העולה, "a" מופיע לפני "A" ו- " B" מופיע לפני "b." זה קורה מכיוון שכשמעריכים אותם כערכי טקסט, "A" = "a" ו- "B" = "b", ללא קשר לגודל הרישיות. Access לוקח בחשבון את הסדר המקורי של הערכים. בעמודת הסדר לפני המיון, "a" מופיע לפני "A" ו- "B" מופיע לפני "b."

כאשר מבצעים את פעולת המיון לפי סדר תלוי-רישיות, ערכי הטקסט מוחלפים בערכי ה- ASCII שלהם. לדוגמה, A = 65‏, a = 97‏, B = 66‏, b = 98, וכן הלאה.

כתוב את קוד ה- VBA

  1. צור מודול VBA והקלד את השורה הבאה במקטע ההצהרות אם אינה נמצאת שם כבר:

Option Explicit

  1. הקלד את הפרוצדורה הבאה במודול בתוך עורך Visual Basic:

    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 Function

    ניתן לקרוא לפונקציה הקודמת המוגדרת על-ידי המשתמש, StrToHex, מתוך שאילתה. בעת העברת שם שדה המיון לפונקציה זו, היא תמיין את ערכי השדה בסדר תלוי-רישיות.

  2. עתה, צור שאילתה ממנה תקרא לפונקציה זו.

    בכרטיסיה יצירה, בקבוצה אחר, לחץ על עיצוב שאילתה.

  3. בתיבת הדו-שיח הצגת טבלה, לחץ על הטבלה שברצונך למיין ולאחר מכן לחץ על הוסף.

  4. גרור את השדות הרצויים לרשת.

  5. בעמודה הריקה הראשונה, בשורה שדה, הקלד Expr1: StrToHex([SortField]).

    StrToHex היא הפונקציה המוגדרת על-ידי המשתמש שיצרת קודם. SortField הוא שם השדה המכיל את הערכים תלויי-הרישיות.

  6. בתא מיין, לחץ על סדר עולה או סדר יורד.

    אם אתה בוחר בסדר עולה, ערכים המתחילים באותיות רישיות יופיעו לפני ערכים המתחילים באותיות קטנות. החלת סדר מיון יורד גורמת לסדר הפוך.

  7. עבור לתצוגת גליון נתונים.

    Access מציג את הרשומות, מסודרות לפי סדר תלוי-רישיות.

לראש הדף

שפר את הכישורים שלך ב- Office
סייר בהדרכה
קבל תכונות חדשות לפני כולם
הצטרף למשתתפי Office Insider

האם מידע זה היה שימושי?

תודה על המשוב!

תודה על המשוב! נראה שכדאי לקשר אותך לאחד מנציגי התמיכה של Office.

×