VBA UCASE

Při práci s abecedou víme, že existují dva způsoby, jak napsat abecedu. Malá a Velká písmena. Někdy musíme změnit formát textu, což znamená malá a velká písmena nebo velká a malá písmena. Pro větší množství textu to nemůžeme udělat pokaždé ručně. Excel nám dává funkci dělat to samé. Chcete-li změnit text z malých na velká písmena, existuje v aplikaci Excel VBA funkce UCASE.

Řetězec, který zadáme jako vstup, může být převzat od uživatele nebo může jít o jednu buňku nebo řadu buněk. Převede celý řetězec na velká písmena nejen na první řetězec.

Jak je vysvětleno výše, UCASE mění ve VBA malá písmena na velká písmena.

Syntaxe funkce UCASE v Excelu VBA

Funkce UCASE má v Excel VBA následující syntaxi:

Zde cílový řetězec je řetězec nebo sada znaků, které chceme změnit z malých na velká písmena. Funkce VBA Ucase mění pouze text na velká písmena, nezmění žádné formátování provedené v buňce nebo nezmění speciální symboly v textu. Cílový řetězec může být jedna buňka nebo to může být řada buněk.

Pokud například zadáme Ucase (anand), výsledkem bude ANAND. Také pokud máme jiný příklad, jako je tento případ (1 pro 2 a 2 pro tři), bude výsledek 1 PRO 2 A 2 PRO TŘI.

Jak používat funkci Excel VBA UCASE?

Naučíme se používat funkci VBA UCASE s několika příklady v Excelu.

Tuto šablonu aplikace VBA UCASE Excel si můžete stáhnout zde - šablonu aplikace VBA UCASE Excel

Funkce VBA UCASE - Příklad č. 1

V tomto příkladu mám v buňce A1 řetězec a chci změnit textovou hodnotu na velká písmena. Prohlédněte si níže uvedený text,

Poznámka: Nezapomeňte vždy povolit kartu vývojáře na kartě Soubory a poté v části Možnosti, aby bylo možné používat VBA ve Excelu.

Pomocí níže uvedených kroků použijte funkci UCASE v aplikaci Excel VBA.

Krok 1: Na kartě vývojáře musíme kliknout na Visual Basic, abychom se dostali do VBA.

Krok 2: Klikněte na kartu Vložit a vložte modul do projektu VBA.

Krok 3: Nyní víme, že musíme pomocí makra deklarovat název makra.

Kód:

 Vzorek () Konec Sub

Krok 4: Aktivujte list tak, aby používal jeho vlastnosti, protože náš cílový řetězec je v buňce A1.

Kód:

 Podvzorky () Pracovní listy („List1“)

Krok 5: Nyní změňte hodnotu v buňce A1 pomocí funkce Ucase následujícím způsobem.

Kód:

 Dílčí vzorek () Pracovní listy ("List1"). Aktivovat rozsah ("A1"). Hodnota = UCase (Rozsah ("A1")) End Sub

Krok 6: Spusťte výše uvedený kód pomocí tlačítka spuštění nebo stisknutím klávesy F5 zobrazte výsledek.

Úspěšně jsme změnili text v buňce A1 na velká písmena.

Funkce VBA UCASE - Příklad č. 2

Nyní vezmeme vstup uživatelem v malém a změníme hodnotu na velká.

Pomocí níže uvedených kroků použijte funkci UCASE v aplikaci Excel VBA.

Krok 1: Na kartě vývojáře musíme kliknout na Visual Basic, abychom se dostali do VBA.

Krok 2: Klikněte na kartu Vložit a vložte modul do projektu VBA.

Krok 3: Začněte deklarováním další dílčí funkce.

Kód:

 Dílčí vzorek1 () Koncový díl

Krok 4: Deklarujte dvě proměnné jako řetězec.

Kód:

 Dílčí vzorek1 () Dim A, B jako řetězec End Sub

Krok 5: Vezměte vstup od uživatele pomocí funkce vstupního pole a uložte jeho hodnotu do proměnné A.

Kód:

 Sub Sample1 () Dim A, B jako String A = InputBox ("Napište řetězec", "Smallcase") End Sub

Krok 6: Do proměnné B uložte hodnotu řetězce A, když se pomocí funkce UCASE změní z malého na velké.

Kód:

 Dílčí vzorek1 () Dim A, B jako řetězec A = InputBox ("Napište řetězec", "malá písmena") B = UCase (A) End Sub

Krok 7: Pomocí funkce msgbox zobrazte hodnotu uloženou v B.

Kód:

 Dílčí vzorek1 () Dim A, B jako řetězec A = InputBox ("Napište řetězec", "malá písmena") B = UCase (A) MsgBox B End Sub

Krok 8: Spusťte výše uvedený kód stisknutím klávesy F5 a zobrazí se výzva k zadání hodnoty. Zadejte libovolný řetězec.

Kliknutím na OK zobrazíte výsledek.

Funkce VBA UCASE - Příklad č. 3

Nyní vyzkoušejte, že pokud máme ve vstupním řetězci nějaké speciální znaky nebo čísla, provede se to v něm. Například mám v buňce C1 řetězec s několika speciálními symboly. Podívejte se na to níže,

Pomocí níže uvedených kroků použijte funkci UCASE v aplikaci Excel VBA.

Krok 1: Na kartě vývojáře musíme kliknout na Visual Basic, abychom se dostali do VBA.

Krok 2: Klikněte na kartu Vložit a vložte modul do projektu VBA.

Krok 3: Nyní deklarujte název makra pomocí subfunkce.

Kód:

 Dílčí vzorek2 () Koncový díl

Krok 4: Aktivujte list tak, aby používal jeho vlastnosti, protože náš cílový řetězec je v buňce C1.

Kód:

 Sub Sample2 () Pracovní listy („List1“)

Krok 5: Nyní změňte hodnotu v buňce C1 pomocí funkce Ucase následujícím způsobem.

Kód:

 Dílčí vzorek 2 () Pracovní listy ("List1"). Aktivace rozsahu ("c1"). Hodnota = UCase (Rozsah ("c1")) End Sub

Krok 6: Spusťte výše uvedený kód pomocí tlačítka spuštění nebo stisknutím klávesy F5 zobrazte výsledek.

Vidíme, že UCase nemění speciální symboly nebo znaky.

Funkce VBA UCASE - Příklad č. 4

Ve výše uvedených příkladech jsme pro jednu buňku změnili text z malých na velká písmena. V tomto příkladu změníme celý rozsah dat na velká písmena.

V listu 2 mám následující údaje. Chci změnit údaje ve sloupci A malými a velkými písmeny ve sloupci B.

Pomocí níže uvedených kroků použijte funkci UCASE v aplikaci Excel VBA.

Krok 1: Na kartě vývojáře musíme kliknout na Visual Basic, abychom se dostali do VBA.

Krok 2: Klikněte na kartu Vložit a vložte modul do projektu VBA.

Krok 3: Chcete -li začít psát kód, deklarujte podfunkci.

Kód:

 Sub Sample3 () Konec Sub

Krok 4: Chcete-li použít vlastnosti listu 2, aktivujte jej nejprve, protože data jsou v listu 2.

Kód:

 Sub Sample3 () Pracovní listy („List2“). Aktivace End Sub

Krok 5: Deklarujte proměnnou A jako dlouhý datový typ.

Kód:

 Sub Sample3 () Pracovní listy („List2“). Aktivujte Dim A jako Long End Sub

Krok 6: Pomocí smyčky změňte data v každém řádku.

Kód:

 Dílčí ukázka3 () Pracovní listy ("List2"). Aktivujte Dim A tak dlouho pro A = 2 až 6 End Sub

Proměnnou A jsme deklarovali od 2 do 6, protože od 2. do 6. řádku máme data v listu.

Krok 7: Nyní změňte hodnotu ve sloupci A na velká písmena a uložte ji do sloupce B podle následujícího kódu.

Kód:

 Dílčí vzorek3 () Pracovní listy („List2“). Aktivujte Dim A tak dlouho pro A = 2 až 6 buněk (A, 2). Hodnota = UCase (Buňky (A, 1). Hodnota) Další Koncová Sub

Krok 8: Spusťte výše uvedený kód stisknutím klávesy F5, abyste viděli výsledek v listu 2 následovně,

Co si pamatovat

  • Funkce VBA Ucase mění text na velká písmena.
  • Řetězec, který zadáme jako vstup, může být jedna buňka nebo více buněk.
  • Řetězec, který zadáme jako vstup, může obsahovat více řetězců.
  • Pokud vstupní řetězec obsahuje speciální znaky nebo symboly, zůstane nezměněn.

Doporučené články

Toto byl průvodce funkcí VBA UCASE. Zde jsme diskutovali o tom, jak používat funkci Excel VBA UCASE spolu s praktickými příklady a stahovatelnou šablonou Excel. Můžete si také prohlédnout naše další doporučené články -

  1. Funkce VBA VLOOKUP
  2. DCOUNT Funkce v Excelu
  3. Jak používat funkci VBA vlevo?
  4. AGGREGATE Funkce v Excelu

Kategorie:

VBA