Tento tutoriál ukáže, ako používať funkcie UCASE, LCASE a STRCONV vo VBA.
Pri práci vo VBA často potrebujete previesť reťazce na malé, veľké alebo správne písmená. To je možné pomocouUCase, LCase a StrConv funkcie.
Tieto funkcie sú dôležité pri manipulácii so reťazcami vo VBA, ako je VBA rozlišujú sa malé a veľké písmená. Ak chcete, aby VBA nerozlišovala malé a veľké písmená, musíte pridať Oporovnanie textu v hornej časti modulu. Tu sa môžete dozvedieť viac: Prevencii VBA rozlišovať malé a veľké písmená
UCase - Previesť reťazec na veľké písmená
The UCase funkcia vo VBA prevádza všetky písmena reťazca na veľké písmená. Existuje iba jeden argument, ktorým môže byť reťazec, premenná s reťazcom alebo hodnota bunky. Táto funkcia sa často používa, ak chcete porovnať dva reťazce. Tu je kód pre funkciu UCase:
12345678 | Dim strText ako reťazecDim strTextUCase ako reťazecstrText = "spustená funkcia veľkých písmen"strTextUCase = UCase (strText)MsgBox strTextUCase |
V tomto prípade chceme previesť všetky písmená strText premenná na veľké písmená a priradený skonvertovaný reťazec priraďte k strTextUCase premenná. Na konci zavoláme pole so správou s skonvertovaným reťazcom:
LCase - Previesť reťazec na malé písmená
Ak chcete previesť všetky písmená reťazca na malé písmená, musíte použiť príponu LCase funkciu. Táto funkcia má jeden argument, rovnaký ako UCase. Toto je kód pre funkciu LCase:
12345678 | Dim strText ako reťazecDim strTextLCase ako reťazecstrText = "SPUŠŤANIE FUNKCIE lowerCASE"strTextLCase = LCase (strText)MsgBox strTextLCase |
V tomto prípade prevedieme všetky písmená reťazca z A1 na malé písmená. Potom je skonvertovaný reťazec priradený k bunke A1.
StrConv - prevod reťazca na správny prípad
The StrConv funkcia vám umožňuje previesť reťazec textu na správne veľké písmená. Funkcia má dva argumenty. Najprv je reťazec, ktorý chcete previesť. Druhý je typ požadovanej konverzie. Ak chcete reťazec previesť na správny prípad, musíte ho nastaviť na vbProperCase. Kód pre funkciu je:
12345678 | Dim strText ako reťazecDim strTextProperCase ako reťazecstrText = "spustenie správnej funkcie prípadu"strTextProperCase = StrConv (strText, vbProperCase)MsgBox strTextProperCase |
Na príklade uvidíte, ako funkcia funguje. Prevezme reťazec z bunky B1, prevedie ho na správny prípad a vráti hodnotu v bunke A1.
StrConv - prevod reťazca na veľké alebo malé písmená
Pomocou funkcie StrConv môžete tiež previesť reťazec na veľké alebo malé písmená. Na to stačí nastaviť druhý argument na vbUpperCase alebo vbLowerCase:
1 | strTextConverted = StrConv (strText, vbUpperCase) |
1 | strTextConverted = StrConv (strText, vbLowerCase) |
VBA Horné, Dolné a Správne púzdro - funkcie kufríkov v Accesse
Všetky vyššie uvedené príklady fungujú v programe Access VBA úplne rovnako ako v programe Excel VBA.
1234 | Private Sub ClientName_AfterUpdate ()„týmto sa text v poli pre meno klienta zmení na veľké písmenáMe.ClientName = UCase (Me.ClientName)Koniec pod |