VBA UCASE

Mens vi jobber med alfabetet vet vi at det er to måter å skrive et alfabet på. Små og store bokstaver. Noen ganger må vi endre formatet på tekst betyr små bokstaver til store bokstaver eller store bokstaver til små bokstaver. For en større mengde tekst, kan vi ikke gjøre det manuelt hver gang. Excel gir oss en funksjon for å gjøre det samme. For å endre teksten fra små bokstaver til store bokstaver er det en funksjon i Excel VBA kalt UCASE.

Strengen vi gir som input kan tas fra en bruker eller kan være en enkelt celle eller et område med celler. Den konverterer all streng til en stor bokstav, ikke bare den første strengen.

Som forklart over, endrer UCASE små bokstaver til store bokstaver i VBA.

Syntaks for UCASE-funksjon i Excel VBA

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

Her er målstreng strengen eller settet med tegn som vi ønsker å endre fra små bokstaver til store bokstaver. VBA Ucase-funksjon endrer bare teksten til en stor bokstav, den endrer ikke noe av formateringen som er gjort i cellen eller endrer ikke spesialsymbolene i teksten. Målstrengen kan være en enkelt celle, eller den kan være et område med celler.

Hvis vi for eksempel legger inn Ucase (anand), er resultatet vi vil ha ANAND. Også hvis vi har et annet eksempel som dette Ucase (1 for 2 og 2 for tre) blir resultatet 1 FOR 2 OG 2 FOR TRE.

Hvordan bruke Excel VBA UCASE-funksjon?

Vi lærer hvordan du bruker en VBA UCASE-funksjon med få eksempler i Excel.

Du kan laste ned denne VBA UCASE Excel-malen her - VBA UCASE Excel-mal

VBA UCASE-funksjon - eksempel # 1

I dette eksemplet har jeg en streng i celle A1 og jeg vil endre tekstverdien til store bokstaver. Ta en titt på teksten nedenfor,

Merk: Husk alltid å aktivere utvikler-fanen fra fil-fanen og deretter fra alternativ-delen for å bruke VBA i Excel.

Følg trinnene nedenfor for å bruke UCASE-funksjonen i Excel VBA.

Trinn 1: I utvikler-fanen må vi klikke visual basic for å komme inn i VBA.

Trinn 2: Klikk på insert-fanen og sett inn en modul i VBA-prosjektet.

Trinn 3: Nå vet vi at vi må erklære et makronavn ved å bruke underfunksjon.

Kode:

 Undereksempel () Slutt Sub

Trinn 4: Aktiver arbeidsarket for å bruke dets egenskaper da målstrengen vår er i celle A1.

Kode:

 Undereksempel () Arbeidsark ("Ark1"). Aktiver Sluttund

Trinn 5: La oss nå endre verdien i celle A1 ved å bruke Ucase-funksjonen som følger.

Kode:

 Undereksempel () Arbeidsark ("Ark1"). Aktiver rekkevidde ("A1"). Verdi = UCase (rekkevidde ("A1")) Slutt sub

Trinn 6: Kjør koden ovenfor med løpsknappen eller trykk F5 for å se resultatet.

Vi har endret teksten i celle A1 til store bokstaver.

VBA UCASE-funksjon - eksempel # 2

Nå vil vi ta innspill fra en bruker med små bokstaver, og vi vil endre verdien til store bokstaver.

Følg trinnene nedenfor for å bruke UCASE-funksjonen i Excel VBA.

Trinn 1: I utvikler-fanen må vi klikke visual basic for å komme inn i VBA.

Trinn 2: Klikk på insert-fanen og sett inn en modul i VBA-prosjektet.

Trinn 3: Start med å erklære en annen underfunksjon.

Kode:

 Sub Sample1 () Slutt Sub

Trinn 4: Deklar to variabler som en streng.

Kode:

 Underprøve1 () Dim A, B Som streng slutt Sub

Trinn 5: Ta innspill fra brukeren ved å bruke en inngangsfeltfunksjon og lagre verdien i en variabel.

Kode:

 Undereksempel1 () Dim A, B Som streng A = InputBox ("Skriv en streng", "Små bokstaver") Slutt sub

Trinn 6: I variabel B lagrer du verdien til streng A når den endres fra små bokstaver til store bokstaver ved å bruke en UCASE-funksjon.

Kode:

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

Trinn 7: Vis verdien som er lagret i B ved hjelp av msgbox-funksjonen.

Kode:

 Undereksempel1 () Dim A, B Som streng A = InputBox ("Skriv en streng", "Små bokstaver") B = UCase (A) MsgBox B End Sub

Trinn 8: Kjør koden ovenfor ved å trykke på F5 så får vi en beskjed om å gi en verdi. Skriv inn hvilken som helst streng.

Klikk på OK for å se resultatet.

VBA UCASE-funksjon - eksempel # 3

La oss nå teste at hvis vi har noen spesialtegn eller tall i inputstrengen, vil det gjøre noen endringer i den. For eksempel har jeg en streng i celle C1 med noen spesielle symboler i seg. Ta en titt på det nedenfor,

Følg trinnene nedenfor for å bruke UCASE-funksjonen i Excel VBA.

Trinn 1: I utvikler-fanen må vi klikke visual basic for å komme inn i VBA.

Trinn 2: Klikk på insert-fanen og sett inn en modul i VBA-prosjektet.

Trinn 3: Nå erklærer et makronavn ved å bruke subfunksjon.

Kode:

 Sub Sample2 () Slutt Sub

Trinn 4: Aktiver arbeidsarket for å bruke dets egenskaper da målstrengen vår er i celle C1.

Kode:

 Undereksempel2 () Arbeidsark ("Ark1"). Aktiver Sluttund

Trinn 5: La oss nå endre verdien i celle C1 ved å bruke Ucase-funksjonen som følger.

Kode:

 Undereksempel2 () Arbeidsark ("Ark1"). Aktiver rekkevidde ("c1"). Verdi = UCase (rekkevidde ("c1")) Slutt sub

Trinn 6: Kjør koden ovenfor med løpsknappen eller trykk F5 for å se resultatet.

Vi kan se at UCase ikke endrer spesialsymbolene eller tegnene.

VBA UCASE-funksjon - eksempel # 4

I eksemplene ovenfor har vi endret teksten fra små bokstaver til store bokstaver for en enkelt celle. I dette eksemplet vil vi endre hele datasystemet til store bokstaver.

I ark 2 har jeg følgende data. Det jeg vil gjøre er å endre dataene i kolonne A med små bokstaver til store bokstaver i kolonne B.

Følg trinnene nedenfor for å bruke UCASE-funksjonen i Excel VBA.

Trinn 1: I utvikler-fanen må vi klikke visual basic for å komme inn i VBA.

Trinn 2: Klikk på insert-fanen og sett inn en modul i VBA-prosjektet.

Trinn 3: Forklar en underfunksjon for å begynne å skrive koden.

Kode:

 Sub Sample3 () Slutt Sub

Trinn 4: Hvis du vil bruke egenskapene til ark 2, aktiverer du det først da dataene er i ark 2.

Kode:

 Undereksempel3 () Arbeidsark ("Ark2"). Aktiver Sluttund

Trinn 5: Angi en variabel A som lang datatype.

Kode:

 Sub Sample3 () Worksheets ("Sheet2"). Aktiver Dim A som Long End Sub

Trinn 6: Bruk for loop for å endre dataene i hver rad.

Kode:

 Undereksempel3 () Arbeidsark ("Ark2"). Aktiver Dim A like lenge i A = 2 til 6 Slutt sub

Vi har erklært variabel A fra 2 til 6 fordi vi fra 2. til 6. trinn har dataene i arket.

Trinn 7: Endre nå verdien i kolonne A til store bokstaver og lagre den i kolonne B med følgende kode.

Kode:

 Undereksempel3 () Arbeidsark ("Ark2"). Aktiver Dim A like lenge i A = 2 til 6 celler (A, 2). Verdi = UCase (Celler (A, 1). Verdi) Neste en slutt Sub

Trinn 8: Kjør koden ovenfor ved å trykke på F5 for å se resultatet i ark 2 som følger,

Ting å huske

  • VBA Ucase-funksjon endrer teksten til store bokstaver.
  • Strengen vi gir som input kan være en enkelt celle eller flere celler.
  • Strengen vi gir som input kan ha flere strenger i seg.
  • Hvis inngangsstrengen har spesielle tegn eller symboler, forblir den uendret.

Anbefalte artikler

Dette har vært en guide til VBA UCASE-funksjon. Her diskuterte vi hvordan du bruker Excel VBA UCASE-funksjon sammen med praktiske eksempler og nedlastbar Excel-mal. Du kan også gå gjennom andre foreslåtte artikler -

  1. VBA VLOOKUP-funksjon
  2. DCOUNT-funksjon i Excel
  3. Hvordan bruke VBA Venstre-funksjon?
  4. AGGREGATE-funksjon i Excel

Kategori:

VBA