VBA UCASE

Mens vi arbejder med alfabet, ved vi, at der er to måder at skrive et alfabet på. Små bogstaver og store bogstaver. Undertiden er vi nødt til at ændre formatet på tekst betyder små bogstaver til store bogstaver eller store bogstaver til små bogstaver. For en større mængde tekst kan vi ikke gøre det manuelt hver gang. Excel giver os en funktion til at gøre det samme. For at ændre teksten fra små bogstaver til store bogstaver er der en funktion i Excel VBA kaldet UCASE.

Den streng, vi giver som input, kan tages fra en bruger eller kan være en enkelt celle eller et område af celler. Det konverterer al strengen til en stor bogstav, ikke kun den første streng.

Som forklaret ovenfor ændrer UCASE små bogstaver til store bogstaver i VBA.

Syntaks for UCASE-funktion i Excel VBA

UCASE-funktion har følgende syntaks i Excel VBA:

Her er målstreng den streng eller sæt af tegn, som vi vil ændre fra små bogstaver til store bogstaver. VBA Ucase-funktion ændrer kun teksten til en stor bogstav, den ændrer ikke nogen formatering, der er udført i cellen, eller ændrer ikke de specielle symboler i teksten. Målstrengen kan være en enkelt celle, eller den kan være en række celler.

For eksempel, hvis vi indtaster Ucase (anand), er det resultat, vi får, ANAND. Også hvis vi har et andet eksempel som denne Ucase (1 for 2 og 2 for tre), vil resultatet være 1 FOR 2 AND 2 FOR THREE.

Sådan bruges Excel VBA UCASE-funktion?

Vi lærer, hvordan man bruger en VBA UCASE-funktion med få eksempler i Excel.

Du kan downloade denne VBA UCASE Excel-skabelon her - VBA UCASE Excel-skabelon

VBA UCASE-funktion - eksempel # 1

I dette eksempel har jeg en streng i celle A1, og jeg vil ændre tekstværdien til store bogstaver. Se på teksten nedenfor,

Bemærk: Husk altid at aktivere udviklerens fane fra fanen filer og derefter fra indstillingsafsnittet for at bruge VBA i Excel.

Følg nedenstående trin for at bruge UCASE-funktion i Excel VBA.

Trin 1: I udviklerens fane skal vi klikke på visual basic for at komme ind i VBA.

Trin 2: Klik på fanen Indsæt, og indsæt et modul i VBA-projektet.

Trin 3: Vi ved nu, at vi er nødt til at erklære et makronavn ved hjælp af underfunktion.

Kode:

 Undereksempel () Slutundert

Trin 4: Aktivér regnearket for at bruge dets egenskaber, da vores målstreng er i celle A1.

Kode:

 Undereksempel () Arbejdsark ("Ark1"). Aktivér slutund

Trin 5: Lad os nu ændre værdien i celle A1 ved at bruge Ucase-funktionen som følger.

Kode:

 Undereksempel () Arbejdsark ("Ark1"). Aktivér rækkevidde ("A1"). Værdi = UCase (Område ("A1")) Sluttunder

Trin 6: Kør ovennævnte kode med kørselsknappen eller tryk på F5 for at se resultatet.

Vi har med succes ændret teksten i celle A1 til store bogstaver.

VBA UCASE-funktion - eksempel # 2

Nu tager vi input fra en bruger med små bogstaver, og vi ændrer værdien til store bogstaver.

Følg nedenstående trin for at bruge UCASE-funktion i Excel VBA.

Trin 1: I udviklerens fane skal vi klikke på visual basic for at komme ind i VBA.

Trin 2: Klik på fanen Indsæt, og indsæt et modul i VBA-projektet.

Trin 3: Start med at erklære en anden subfunktion.

Kode:

 Underprøve1 () Slutundert

Trin 4: Angiv to variabler som en streng.

Kode:

 Underprøve1 () Dim A, B Som strengendelsub

Trin 5: Tag input fra brugeren ved hjælp af en inputbox-funktion og gem dens værdi i en variabel.

Kode:

 Undereksempel1 () Dim A, B som streng A = InputBox ("Skriv en streng", "Mindre bogstaver") End Sub

Trin 6: I variabel B gemmer værdien af ​​streng A, når den ændres fra små bogstaver til store bogstaver ved hjælp af en UCASE-funktion.

Kode:

 Undereksempel1 () Dim A, B som streng A = InputBox ("Skriv en streng", "Små bogstaver") B = UCase (A) End Sub

Trin 7: Vis den værdi, der er gemt i B ved hjælp af funktionen msgbox.

Kode:

 Underprøve1 () Dim A, B som streng A = InputBox ("Skriv en streng", "Små bogstaver") B = UCase (A) MsgBox B End Sub

Trin 8: Kør ovenstående kode ved at trykke på F5, så får vi en meddelelse om at give en værdi. Indtast en hvilken som helst streng.

Klik på OK for at se resultatet.

VBA UCASE-funktion - eksempel # 3

Lad os nu teste, at hvis vi har nogle specialtegn eller tal i inputstrengen, vil det foretage ændringer i det. For eksempel har jeg en streng i celle C1 med nogle specielle symboler i den. Se det nedenfor,

Følg nedenstående trin for at bruge UCASE-funktion i Excel VBA.

Trin 1: I udviklerens fane skal vi klikke på visual basic for at komme ind i VBA.

Trin 2: Klik på fanen Indsæt, og indsæt et modul i VBA-projektet.

Trin 3: Angiv nu et makronavn ved hjælp af subfunktion.

Kode:

 Undereksempel2 () Slutundert

Trin 4: Aktivér regnearket for at bruge dets egenskaber, da vores målstreng er i celle C1.

Kode:

 Undereksempel2 () Arbejdsark ("Ark1"). Aktivér slutund

Trin 5: Lad os nu ændre værdien i celle C1 ved hjælp af Ucase-funktionen som følger.

Kode:

 Undereksempel2 () Arbejdsark ("Ark1"). Aktiver rækkevidde ("c1"). Værdi = UCase (rækkevidde ("c1")) Slut sub

Trin 6: Kør ovennævnte kode med kørselsknappen eller tryk på F5 for at se resultatet.

Vi kan se, at UCase ikke ændrer de specielle symboler eller tegn.

VBA UCASE-funktion - eksempel # 4

I ovenstående eksempler har vi ændret teksten fra små bogstaver til store bogstaver for en enkelt celle. I dette eksempel ændrer vi hele dataspændingen til store bogstaver.

I ark 2 har jeg følgende data. Hvad jeg vil gøre er at ændre dataene i kolonne A med små bogstaver til store bogstaver i kolonne B.

Følg nedenstående trin for at bruge UCASE-funktion i Excel VBA.

Trin 1: I udviklerens fane skal vi klikke på visual basic for at komme ind i VBA.

Trin 2: Klik på fanen Indsæt, og indsæt et modul i VBA-projektet.

Trin 3: Erklær en underfunktion for at begynde at skrive koden.

Kode:

 Undereksempel3 () Slutundersøgelse

Trin 4: For at bruge egenskaber på ark 2 skal du først aktivere det, da dataene er i ark 2.

Kode:

 Undereksempel3 () Arbejdsark ("Ark2"). Aktivér slutund

Trin 5: Angiv en variabel A som lang datatype.

Kode:

 Undereksempel3 () Arbejdsark ("Ark2") Aktivér Dim A som langenden

Trin 6: Brug for loop til at ændre dataene i hver række.

Kode:

 Underprøve3 () Arbejdsark ("Ark2") Aktivér Dim A så længe i A = 2 til 6 slutningssub

Vi har erklæret variabel A fra 2 til 6, fordi vi fra 2. til 6. række har dataene på arket.

Trin 7: Skift nu værdien i kolonne A til store bogstaver, og gem den i kolonne B ved hjælp af følgende kode.

Kode:

 Underprøve3 () Arbejdsark ("Ark2"). Aktiver Dim A så længe for A = 2 til 6 celler (A, 2). Værdi = UCase (Celler (A, 1). Værdi) Næste En slut Sub

Trin 8: Kør ovenstående kode ved at trykke på F5 for at se resultatet i ark 2 som følger,

Ting at huske

  • VBA Ucase-funktion ændrer teksten til store bogstaver.
  • Den streng, vi giver som input, kan være en enkelt celle eller flere celler.
  • Den streng, vi giver som input, kan have flere strenge i sig.
  • Hvis inputstrengen har specielle tegn eller symboler, forbliver den uændret.

Anbefalede artikler

Dette har været en guide til VBA UCASE-funktion. Her diskuterede vi, hvordan du bruger Excel VBA UCASE-funktion sammen med praktiske eksempler og downloadbar excel-skabelon. Du kan også gennemgå vores andre foreslåede artikler -

  1. VBA VLOOKUP-funktion
  2. DCOUNT-funktion i Excel
  3. Sådan bruges VBA venstre funktion?
  4. AGGREGATE-funktion i Excel

Kategori:

VBA