VBA til at konvertere tekst fra små til store bogstaver

Indholdsfortegnelse:

Anonim

Vi ved, hvordan man konverterer små bogstaver til store bogstaver på regneark, men hvordan konverterer vi små til store bogstaver ved hjælp af VBA? Mens du automatiserer processen, får du muligvis brug for at konvertere teksten på arket til store bogstaver.

På regnearket bruger vi UPPER -funktionen til at gemme små og store bogstaver. I VBA har vi en lignende funktion. Navnet er funktionen er UCase. UCase står for UpperCase.

Syntaks for UCase -funktion:

= UCase (Snor)

Hersnorkan være en hård kodestreng eller en reference til strengen.

Så nu hvor vi kender til den funktion, der kan bruges til at ændre små bogstaver til store strenge, lad os bruge den i et praktisk eksempel.

Konverter al tekst på et ark til store bogstaver

Her har vi en simpel opgave at konvertere al tekst på et givet ark i en projektmappe til store bogstaver. L

For at få koden til konvertering af tekst til store bogstaver; vi skal følge nedenstående trin for at starte VB -editor

  • Klik på fanen Udvikler
  • Vælg Visual Basic i kodegruppen

Kopiér nedenstående kode til regnearksmodul (ikke et normalt modul).


Sub UpperCaseCode1 ()
Application.ScreenUpdating = Falsk
Dim Rng som rækkevidde
Dim c Som område
Ved fejl Genoptag næste
Indstil Rng = Cells.SpecialCells (xlCellTypeConstants, 2)
For hver c I Rng
c.Værdi = UCase (c.Værdi)
Næste c
Application.ScreenUpdating = True
Afslut Sub

Hvordan virker det?

Ovenstående kode er skrevet i ark1 -modulet. Ovenstående kode vil konvertere al teksten på arket1 til store bogstaver.

Hovedlinjerne i ovenstående kode er:

Indstil Rng = Cells.SpecialCells (xlCellTypeConstants, 2)
For hver c I Rng
c.Værdi = UCase (c.Værdi)
Næste c

Her bruger vi SpecialCells -funktion i Cells -klassen og sender argumenterne xlCellTypeConstants. Det returnerer en optælling af celler og områder, der indeholder konstanter.

Dernæst bruger vi for -loop til at iterere over hver celle i optælling. Dernæst ændrer vi denne celleværdi ved hjælp af UCase -funktionen.

Her er udsagnetc.Værdi = UCase (c.Værdi) opdaterer værdierne i hver celle med stor tekst.

Eksempel 2: Konverter tekst fra kolonne A til store bogstaver.

I dette eksempel har vi til opgave kun at konvertere tekstkolonne A. Det kan være en god idé at gøre dette, når bestemte kolonner indeholder særlig tekst, der kun skal være i store bogstaver.

Sub UpperCaseCode2 ()
Application.ScreenUpdating = Falsk
Dim celle som område
For hver celle i området ("$ A $ 1:" & Range ("$ A $ 1"). SpecialCells (xlLastCell) .Address)
Hvis Len (celle)> 0 Så celle = UCase (celle)
Næste celle
Application.ScreenUpdating = True
Afslut Sub

Koden er næsten den samme som det foregående eksempel. Den eneste ændring, vi har, er disse linjer:

For hver celle i området ("$ A $ 1:" & Range ("$ A $ 1"). SpecialCells (xlLastCell) .Address)
Hvis Len (celle)> 0 Så celle = UCase (celle)
Næste celle

Her skaber vi et dynamisk område ved hjælp af linjen Range ("$ A $ 1:" & Range ("$ A $ 1"). SpecialCells (xlLastCell) .Address). Denne linje opretter et område, der starter fra celle A1 til den sidste celle, der indeholder en hvilken som helst værdi i kolonne A.

Derefter gentages vi gennem hver celle og opdaterer den med store strenge af sig selv.

Du kan downloade filen herunder.

Download - VBA til at konvertere tekst fra små til store bogstaver - xlsm

Så ja fyre, det er sådan du kan opdatere små tekst til stor tekst. Jeg håber, jeg var forklarende nok. Hvis du er i tvivl om denne artikel eller andre VBA -relaterede forespørgsler. Spørg mig i kommentarfeltet herunder.

Sådan bruges TRIM -funktionen i Excel: TRIM -funktionen bruges til at trimme strenge og rense eventuelle efterfølgende eller førende mellemrum fra streng. Dette hjælper os meget i rengøringsprocessen af ​​data.

Sådan bruges CLEAN -funktionen i Excel: Clean -funktion bruges til at rydde op i tegn, der ikke kan udskrives fra strengen. Denne funktion bruges mest med TRIM -funktionen til at rydde op i importerede udenlandske data.

Erstat tekst fra enden af ​​en streng, der starter fra variabel position: For at erstatte tekst fra slutningen af ​​strengen bruger vi funktionen REPLACE. Funktionen REPLACE bruger tekstens placering i strengen til at erstatte den.

Sådan kontrolleres, om en streng indeholder en af ​​mange tekster i Excel: For at finde ud af, om en streng indeholder flere tekst, bruger vi denne formel. Vi bruger SUM -funktionen til at opsummere alle matches og udfører derefter en logik for at kontrollere, om strengen indeholder en af ​​de flere strenge.

Tæl celler, der indeholder specifik tekst: En simpel COUNTIF -funktion gør magien. For at tælle antallet af flere celler, der indeholder en given streng, bruger vi wildcard -operatoren med COUNTIF -funktionen.

Excel REPLACE vs SUBSTITUTE -funktion: Funktionerne REPLACE og SUBSTITUTE er de mest misforståede funktioner. For at finde og erstatte en given tekst bruger vi SUBSTITUTE -funktionen. Hvor REPLACE bruges til at erstatte et antal tegn i en streng …

Populære artikler:

50 Excel -genveje til at øge din produktivitet | Få hurtigere til din opgave. Disse 50 genveje får dig til at arbejde endnu hurtigere i Excel.

Sådan bruges Excel VLOOKUP -funktion| Dette er en af ​​de mest anvendte og populære funktioner i excel, der bruges til at slå værdi op fra forskellige områder og ark.

Sådan bruges Excel COUNTIF -funktion| Tæl værdier med betingelser ved hjælp af denne fantastiske funktion. Du behøver ikke at filtrere dine data for at tælle bestemte værdier. Countif -funktion er afgørende for at forberede dit dashboard.

Sådan bruges SUMIF -funktionen i Excel | Dette er endnu en vigtig instrumentbrætfunktion. Dette hjælper dig med at opsummere værdier på bestemte betingelser.