Řazení záznamů s rozlišováním velkých a malých písmen

Poznámka: Snažíme se pro vás co nejrychleji zajistit aktuální obsah nápovědy ve vašem jazyce. Tato stránka byla přeložena automaticky a může obsahovat gramatické chyby nebo nepřesnosti. Naším cílem je to, aby pro vás byl její obsah užitečný. Mohli byste nám prosím dát ve spodní části této stránky vědět, jestli vám informace v článku pomohly? Pokud byste se rádi podívali na jeho anglickou verzi, najdete ji tady.

Microsoft Office Access 2007 řazení ve vzestupném nebo sestupném pořadí bez ohledu na případ. Však sestavením několik řádků Visual Basic for Applications (VBA) kódu můžete seřadit text hodnot znaků ASCII. Malá písmena a výsledky v rozlišováním velkých a řazení na základě hodnoty ASCII rozlišují velká písmena.

Následující tabulka ukazuje, jak se liší od malá a velká písmena řazení vzestupném pořadí řazení v Accessu:

Prvky můžete předem setřídit pořadí

Vzestupně

Velká a malá písmena objednávek 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

I když výsledky ve sloupci pořadí vzestupně se může zobrazit nejdřív poněkud neočekávané, nejsou. Ve sloupci pořadí vzestupně "na" zobrazí před "A" a "B" se zobrazí před "b". V takovém vzhledem k tomu, že při vyhodnocování jako textové hodnoty, "A" = "a" a "B" = "b", zda malá a velká. Access bere v úvahu původní pořadí hodnot. Ve sloupci pořadí řazení před "na" předchází "A" a "B" předchází "b".

Po provedení operace malá a velká písmena řazení textové hodnoty nahrazeny hodnotami ASCII. Příklad: A = 65; = 97, B = 66, b = 98 atd.

Zadejte kód jazyka VBA

  1. Vytvoření modulu VBA a zadejte následující řádek oddíl deklarací, pokud ještě není:

Možnost explicitní

  1. Do modulu v editoru jazyka Visual Basic zadejte následující postup:

    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

    Předchozí uživatelem definovaných funkcí, StrToHex můžete volat z dotazu. Když umístíte název pole řazení touto funkcí, seřadí hodnoty polí s rozlišováním velkých.

  2. Nyní vytvořte dotaz, ze kterého můžete volat tuto funkci.

    Na kartě Vytvoření klikněte ve skupině Dotazy na Návrh dotazu.

  3. V dialogovém okně Zobrazit tabulku klikněte na tabulku, která chcete seřadit a potom klikněte na Přidat.

  4. Přetáhněte pole, která chcete do mřížky.

  5. Do prvního prázdného sloupce v řádku pole zadejte Výraz1: StrToHex([Pole_pro_řazení]).

    StrToHex je uživatelem definovaných funkcí, které jste dříve vytvořili. Pole_pro_řazení je název pole obsahující hodnoty, velká a malá písmena.

  6. Do buňky řazení klikněte na Vzestupně nebo Sestupně.

    Pokud se rozhodnete vzestupně, zobrazí se hodnota začínající na s velkými písmeny před ty, které začínají na malá písmena. Použití sestupném pořadí řazení znamená opakem.

  7. Přepněte do zobrazení datového listu.

    Aplikace Access zobrazí záznamy řadit s rozlišováním velkých.

Začátek stránky

Rozšiřte své dovednosti s Office
Projít školení
Získejte nové funkce jako první
Připojte se k účastníkům programu Office Insiders

Byly tyto informace užitečné?

Děkujeme vám za zpětnou vazbu.

Děkujeme vám za váš názor! Pravděpodobně bude užitečné, když vás spojíme s některým z našich agentů podpory Office.

×