VBA for å konvertere tekst fra små til store bokstaver

Innholdsfortegnelse:

Anonim

Vi vet hvordan vi konverterer små tekst til store tekster i regnearket, men hvordan konverterer vi små til store bokstaver ved hjelp av VBA? Mens du automatiserer prosessen, kan det hende du trenger å konvertere teksten på arket til store bokstaver.

På regnearket bruker vi funksjonen HOVED for å små bokstaver til store bokstaver. I VBA har vi en lignende funksjon. Navnet er funksjonen er UCase. UCase står for UpperCase.

Syntaks for UCase -funksjon:

= UCase (String)

Herstrengkan være en hard kode streng eller en referanse til strengen.

Så nå som vi vet om funksjonen som kan brukes til å endre små bokstaver til store strenger, la oss bruke den i et praktisk eksempel.

Konverter all tekst på et ark til store bokstaver

Her har vi en enkel oppgave å konvertere all tekst på et gitt ark i en arbeidsbok til store bokstaver. L

For å få koden for å konvertere tekst til store bokstaver; vi må følge trinnene nedenfor for å starte VB -editor

  • Klikk på kategorien Utvikler
  • Velg Visual Basic fra kodegruppen

Kopier koden nedenfor til regnearkmodulen (ikke en normal modul).


Sub UpperCaseCode1 ()
Application.ScreenUpdating = Falsk
Dim Rng som rekkevidde
Dim c As Range
Ved feil Fortsett neste
Sett Rng = Cells.SpecialCells (xlCellTypeConstants, 2)
For hver c I Rng
c.Value = UCase (c.Value)
Neste c
Application.ScreenUpdating = True
Slutt Sub

Hvordan virker det?

Koden ovenfor er skrevet i ark1 -modulen. Koden ovenfor vil konvertere all teksten på arket1 til store bokstaver.

Hovedlinjene i koden ovenfor er:

Sett Rng = Cells.SpecialCells (xlCellTypeConstants, 2)
For hver c I Rng
c.Value = UCase (c.Value)
Neste c

Her bruker vi SpecialCells -funksjonen i Cells -klassen og sender argumentene xlCellTypeConstants. Den returnerer en oppregning av celler og områder som inneholder konstanter.

Deretter bruker vi for -sløyfen til å iterere over hver celle i oppregning. Deretter endrer vi celleverdien ved hjelp av UCase -funksjonen.

Her uttalelsenc.Value = UCase (c.Value) oppdaterer verdiene i hver celle med stor tekst.

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

I dette eksemplet har vi bare til oppgave å konvertere tekstkolonne A. Det kan være lurt å gjøre dette når spesifikke kolonner inneholder spesiell tekst som bare må stå i store bokstaver.

Sub UpperCaseCode2 ()
Application.ScreenUpdating = Falsk
Dim cell As Range
For hver celle i området ("$ A $ 1:" & Range ("$ A $ 1"). SpecialCells (xlLastCell) .Address)
Hvis Len (celle)> 0 Da celle = UCase (celle)
Neste celle
Application.ScreenUpdating = True
Slutt Sub

Koden er nesten den samme som forrige eksempel. Den eneste endringen vi har er disse linjene:

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

Her lager vi et dynamisk område ved hjelp av linjen Range ("$ A $ 1:" & Range ("$ A $ 1"). SpecialCells (xlLastCell) .Address). Denne linjen oppretter et område som starter fra celle A1 til den siste cellen som inneholder en hvilken som helst verdi i kolonne A.

Deretter itererer vi gjennom hver celle og oppdaterer den med store strenger av seg selv.

Du kan laste ned filen nedenfor.

Last ned - VBA for å konvertere tekst fra små til store bokstaver - xlsm

Så ja gutta, slik kan du oppdatere liten tekst til tekst i store bokstaver. Jeg håper jeg var forklarende nok. Hvis du er i tvil om denne artikkelen eller andre VBA -relaterte forespørsler. Spør meg i kommentarfeltet nedenfor.

Slik bruker du TRIM -funksjonen i Excel: TRIM -funksjonen brukes til å trimme strenger og rense eventuelle etterfølgende eller ledende mellomrom fra strengen. Dette hjelper oss i rengjøringsprosessen av data mye.

Slik bruker du CLEAN -funksjonen i Excel: Clean -funksjonen brukes til å rydde opp i utskrivbare tegn fra strengen. Denne funksjonen brukes mest med TRIM -funksjonen for å rydde opp importerte utenlandske data.

Erstatt tekst fra enden av en streng fra variabel posisjon: For å erstatte tekst fra enden av strengen bruker vi REPLACE -funksjonen. REPLACE -funksjonen bruker plasseringen av tekst i strengen for å erstatte den.

Hvordan sjekke om en streng inneholder en av mange tekster i Excel: For å finne ut om en streng inneholder flere tekst, bruker vi denne formelen. Vi bruker SUM -funksjonen til å oppsummere alle treffene og deretter utføre en logikk for å sjekke om strengen inneholder noen av de flere strengene.

Tell celler som inneholder spesifikk tekst: En enkel COUNTIF -funksjon vil gjøre magien. For å telle antallet flere celler som inneholder en gitt streng bruker vi jokertegnoperatoren med COUNTIF -funksjonen.

Excel REPLACE vs SUBSTITUTE -funksjon: Funksjonene REPLACE og SUBSTITUTE er de mest misforståtte funksjonene. For å finne og erstatte en gitt tekst bruker vi SUBSTITUTE -funksjonen. Hvor REPLACE brukes til å erstatte et antall tegn i strengen …

Populære artikler:

50 Excel -snarveier for å øke produktiviteten | Bli raskere på oppgaven din. Disse 50 snarveiene får deg til å jobbe enda raskere med Excel.

Slik bruker du Excel VLOOKUP -funksjon| Dette er en av de mest brukte og populære funksjonene til excel som brukes til å slå opp verdi fra forskjellige områder og ark.

Hvordan bruke utmerke COUNTIF -funksjon| Tell verdier med betingelser ved hjelp av denne fantastiske funksjonen. Du trenger ikke å filtrere dataene dine for å telle spesifikke verdier. Countif -funksjonen er avgjørende for å forberede dashbordet.

Slik bruker du SUMIF -funksjonen i Excel | Dette er en annen viktig funksjon på dashbordet. Dette hjelper deg med å oppsummere verdier på spesifikke forhold.