VBA UCASE

Tijdens het werken met alfabet weten we dat er twee manieren zijn om een ​​alfabet te schrijven. Kleine letters en hoofdletters. Soms moeten we het formaat van de tekst wijzigen, betekent kleine letters in hoofdletters of hoofdletters in kleine letters. Voor een grotere hoeveelheid tekst kunnen we dit niet elke keer handmatig doen. Excel geeft ons een functie om hetzelfde te doen. Om de tekst van kleine letters naar hoofdletters te veranderen, is er een functie in Excel VBA genaamd UCASE.

De tekenreeks die we als invoer opgeven, kan van een gebruiker worden genomen of kan een enkele cel of een reeks cellen zijn. Het converteert alle tekenreeksen naar hoofdletters, niet alleen de eerste tekenreeks.

Zoals hierboven uitgelegd, wijzigt UCASE de kleine letters in hoofdletters in VBA.

Syntaxis van UCASE-functie in Excel VBA

UCASE-functie heeft de volgende syntaxis in Excel VBA:

Hier is de doelreeks de reeks of reeks tekens die we willen wijzigen van kleine letters naar hoofdletters. VBA Ucase-functie verandert alleen de tekst in hoofdletters, verandert niets aan de opmaak in de cel of verandert niets aan de speciale symbolen in de tekst. De doelreeks kan een enkele cel zijn of een reeks cellen.

Als we bijvoorbeeld Ucase (anand) invoeren, is het resultaat dat we hebben ANAND. Als we nog een ander voorbeeld zoals deze Ucase hebben (1 voor 2 en 2 voor drie), is het resultaat 1 VOOR 2 EN 2 VOOR DRIE.

Hoe de Excel VBA UCASE-functie te gebruiken?

We zullen leren hoe een VBA UCASE-functie te gebruiken met enkele voorbeelden in Excel.

U kunt deze VBA UCASE Excel-sjabloon hier downloaden - VBA UCASE Excel-sjabloon

VBA UCASE-functie - Voorbeeld # 1

In dit voorbeeld heb ik een tekenreeks in cel A1 en wil ik de tekstwaarde wijzigen in hoofdletters. Bekijk de onderstaande tekst,

Opmerking: vergeet niet om het tabblad Ontwikkelaar altijd in te schakelen via het tabblad Bestanden en vervolgens vanuit het gedeelte Opties om VBA in Excel te gebruiken.

Volg de onderstaande stappen om de UCASE-functie in Excel VBA te gebruiken.

Stap 1: Op het tabblad van de ontwikkelaar moeten we op Visual Basic klikken om naar VBA te gaan.

Stap 2: Klik op het tabblad invoegen en voeg een module in het VBA-project in.

Stap 3: Nu weten we dat we een macronaam moeten declareren met behulp van de subfunctie.

Code:

 Sub-monster () Einde Sub

Stap 4: Activeer het werkblad om de eigenschappen ervan te gebruiken, aangezien onze doelreeks zich in cel A1 bevindt.

Code:

 Sub-voorbeeld () Werkbladen ("Blad1"). Activeer Sub-einde

Stap 5: Laten we nu de waarde in cel A1 wijzigen met de Ucase-functie als volgt.

Code:

 Sub-voorbeeld () Werkbladen ("Blad1"). Activeer bereik ("A1"). Waarde = UCase (bereik ("A1")) Einde Sub

Stap 6: Voer de bovenstaande code uit met de knop Uitvoeren of druk op F5 om het resultaat te bekijken.

We hebben de tekst in cel A1 met succes gewijzigd in hoofdletters.

VBA UCASE-functie - Voorbeeld # 2

Nu nemen we invoer door een gebruiker in kleine letters en veranderen we de waarde in hoofdletters.

Volg de onderstaande stappen om de UCASE-functie in Excel VBA te gebruiken.

Stap 1: Op het tabblad van de ontwikkelaar moeten we op Visual Basic klikken om naar VBA te gaan.

Stap 2: Klik op het tabblad invoegen en voeg een module in het VBA-project in.

Stap 3: Begin met het verklaren van een andere subfunctie.

Code:

 Sub Sample1 () Einde Sub

Stap 4: Declareer twee variabelen als een string.

Code:

 Sub Sample1 () Dim A, B Als String End Sub

Stap 5: Neem invoer van de gebruiker met behulp van een invoervakfunctie en sla de waarde op in een variabele.

Code:

 Sub Sample1 () Dim A, B As String A = InputBox ("Schrijf een string", "Kleine letters") End Sub

Stap 6: Sla in variabele B de waarde op van tekenreeks A wanneer deze wordt gewijzigd van kleine letters in hoofdletters met een UCASE-functie.

Code:

 Sub Sample1 () Dim A, B Als String A = InputBox ("Schrijf een string", "Kleine letters") B = UCase (A) End Sub

Stap 7: Geef de waarde weer die is opgeslagen in B met behulp van de msgbox-functie.

Code:

 Sub Sample1 () Dim A, B Als String A = InputBox ("Schrijf een string", "Kleine letters") B = UCase (A) MsgBox B End Sub

Stap 8: Voer de bovenstaande code uit door op F5 te drukken en we krijgen een prompt om een ​​waarde te geven. Voer een string in.

Klik op OK om het resultaat te zien.

VBA UCASE-functie - Voorbeeld # 3

Laten we nu testen dat als we enkele speciale tekens of cijfers in de invoertekenreeks hebben, deze hierin wijzigingen zal aanbrengen. Ik heb bijvoorbeeld een tekenreeks in cel C1 met enkele speciale symbolen erin. Bekijk het hieronder,

Volg de onderstaande stappen om de UCASE-functie in Excel VBA te gebruiken.

Stap 1: Op het tabblad van de ontwikkelaar moeten we op Visual Basic klikken om naar VBA te gaan.

Stap 2: Klik op het tabblad invoegen en voeg een module in het VBA-project in.

Stap 3: Declareer nu een macronaam met behulp van een subfunctie.

Code:

 Sub Sample2 () Einde Sub

Stap 4: Activeer het werkblad om de eigenschappen ervan te gebruiken, aangezien onze doelreeks zich in cel C1 bevindt.

Code:

 Sub Sample2 () Werkbladen ("Sheet1"). Activeer Sub Sub

Stap 5: Laten we nu de waarde in cel C1 wijzigen met de Ucase-functie als volgt.

Code:

 Sub Sample2 () Werkbladen ("Sheet1"). Activeer bereik ("c1"). Waarde = UCase (bereik ("c1")) End Sub

Stap 6: Voer de bovenstaande code uit met de knop Uitvoeren of druk op F5 om het resultaat te bekijken.

We kunnen zien dat UCase de speciale symbolen of tekens niet wijzigt.

VBA UCASE-functie - Voorbeeld # 4

In de bovenstaande voorbeelden hebben we de tekst gewijzigd van kleine letters naar hoofdletters voor een enkele cel. In dit voorbeeld zullen we het hele gegevensbereik wijzigen in hoofdletters.

In blad 2 heb ik de volgende gegevens. Wat ik wil doen is de gegevens in kolom A in kleine letters wijzigen in hoofdletters in kolom B.

Volg de onderstaande stappen om de UCASE-functie in Excel VBA te gebruiken.

Stap 1: Op het tabblad van de ontwikkelaar moeten we op Visual Basic klikken om naar VBA te gaan.

Stap 2: Klik op het tabblad invoegen en voeg een module in het VBA-project in.

Stap 3: Declareer een subfunctie om de code te schrijven.

Code:

 Sub Sample3 () Einde Sub

Stap 4: Om eigenschappen van blad 2 te gebruiken, moet u deze eerst activeren omdat de gegevens zich in blad 2 bevinden.

Code:

 Sub Sample3 () Werkbladen ("Sheet2") Activeer Einde Sub

Stap 5: Declareer een variabele A als lang datatype.

Code:

 Sub Sample3 () Werkbladen ("Sheet2"). Activeer Dim A als Long End Sub

Stap 6: Gebruik voor lus om de gegevens in elke rij te wijzigen.

Code:

 Sub Sample3 () Werkbladen ("Sheet2"). Activeer Dim A zo lang voor A = 2 tot 6 einde Sub

We hebben variabele A gedeclareerd van 2 tot 6 omdat we van de 2e tot de 6e rij de gegevens in het blad hebben.

Stap 7: Wijzig nu de waarde in kolom A in hoofdletters en sla deze op in kolom B met de volgende Code.

Code:

 Sub Sample3 () Werkbladen ("Sheet2"). Activeer Dim A zo lang voor A = 2 tot 6 cellen (A, 2). Waarde = UCase (cellen (A, 1). Waarde) Volgende A Einde Sub

Stap 8: Voer de bovenstaande code uit door op F5 te drukken om het resultaat in blad 2 als volgt te zien,

Dingen om te onthouden

  • VBA Ucase-functie verandert de tekst in hoofdletters.
  • De tekenreeks die we als invoer geven, kan een enkele cel of meerdere cellen zijn.
  • De tekenreeks die we als invoer opgeven, kan meerdere tekenreeksen bevatten.
  • Als de invoertekenreeks speciale tekens of symbolen bevat, blijft deze ongewijzigd.

Aanbevolen artikelen

Dit is een leidraad geweest voor de VBA UCASE-functie. Hier hebben we besproken hoe u Excel VBA UCASE-functie kunt gebruiken, samen met praktische voorbeelden en een downloadbare Excel-sjabloon. U kunt ook onze andere voorgestelde artikelen doornemen -

  1. VBA VLOOKUP-functie
  2. DCOUNT-functie in Excel
  3. Hoe de VBA Left-functie te gebruiken?
  4. AGGREGATE-functie in Excel

Categorie:

VBA