VBA muuntaa tekstin pienistä isoiksi

Sisällysluettelo:

Anonim

Tiedämme, miten pienet tekstit voidaan muuntaa isoiksi teksteiksi laskentataulukossa, mutta miten voimme muuntaa pienet kirjaimet isoiksi VBA: n avulla? Automaattisesti prosessin aikana saatat joutua muuttamaan taulukon tekstin isoiksi kirjaimiksi.

Laskentataulukossa käytämme UPPER -funktiota pieniin ja pieniin kirjaimiin. VBA: ssa meillä on samanlainen toiminto. Nimi on funktio UCase. UCase on lyhenne sanoista UpperCase.

UCase -toiminnon syntaksi:

= UCase (Jousisoitin)

Tässämerkkijonovoi olla kovakoodijono tai viittaus merkkijonoon.

Joten nyt kun tiedämme toiminnon, jolla voidaan muuttaa pienet kirjaimet isoiksi merkkijonoiksi, käytämme sitä käytännön esimerkissä.

Muunna kaikki arkin teksti isoiksi kirjaimiksi

Tässä on yksinkertainen tehtävä muuntaa työkirjan tietyn taulukon kaikki tekstit isoiksi kirjaimiksi. L

Saada koodi tekstin muuntamiseksi isoiksi kirjaimiksi; meidän on noudatettava alla olevia ohjeita VB -editorin käynnistämiseksi

  • Napsauta Kehittäjä -välilehteä
  • Valitse koodiryhmästä Visual Basic

Kopioi alla oleva koodi laskentataulukkomoduuliin (ei tavallinen moduuli).


Sub UpperCaseCode1 ()
Application.ScreenUpdating = Väärä
Dim Rng alueena
Dim c Kuten alue
Virhe Jatka seuraavaksi
Aseta Rng = Cells.SpecialCells (xlCellTypeConstants, 2)
Jokaiselle c In Rng
c.arvo = UCase (c.arvo)
Seuraava c
Application.ScreenUpdating = Totta
End Sub

Kuinka se toimii?

Yllä oleva koodi on kirjoitettu sheet1 -moduuliin. Yllä oleva koodi muuntaa koko taulukon1 tekstin isoiksi kirjaimiksi.

Yllä olevan koodin päärivit ovat:

Aseta Rng = Cells.SpecialCells (xlCellTypeConstants, 2)
Jokaiselle c In Rng
c.arvo = UCase (c.arvo)
Seuraava c

Tässä käytämme Cells -luokan SpecialCells -toimintoa ja välitämme argumentit xlCellTypeConstants. Se palauttaa luettelon soluja ja alueita, jotka sisältävät vakioita.

Seuraavaksi käytämme for -silmukkaa iteroimaan jokaisen solun luettelossa. Seuraavaksi muutamme solun arvoa UCase -funktiolla.

Tässä lausuntoc.arvo = UCase (c.arvo) päivittää jokaisen solun arvot isolla tekstillä.

Esimerkki 2: Muuta sarakkeen A teksti isoiksi kirjaimiksi.

Tässä esimerkissä tehtävänämme on muuntaa vain tekstisarake A. Voit halutessasi tehdä tämän, kun tietyt sarakkeet sisältävät erikoistekstiä, joka on kirjoitettava vain isoilla kirjaimilla.

Sub UpperCaseCode2 ()
Application.ScreenUpdating = Väärä
Himmennä solu alueena
Jokaiselle alueen solulle ("$ A $ 1:" & Range ("$ A $ 1"). SpecialCells (xlLastCell) .Osoite)
Jos Len (solu)> 0 Sitten solu = UCase (solu)
Seuraava solu
Application.ScreenUpdating = Totta
End Sub

Koodi on melkein sama kuin edellinen esimerkki. Ainoa muutos meillä on nämä rivit:

Jokaiselle alueen solulle ("$ A $ 1:" & Range ("$ A $ 1"). SpecialCells (xlLastCell) .Osoite)
Jos Len (solu)> 0 Sitten solu = UCase (solu)
Seuraava solu

Tässä luomme dynaamisen alueen linjaa käyttäen Alue ("$ A $ 1:" & Range ("$ A $ 1"). SpecialCells (xlLastCell) .Osoite). Tämä rivi luo alueen solusta A1 viimeiseen soluun, joka sisältää minkä tahansa arvon sarakkeessa A.

Sitten toistamme jokaisen solun läpi ja päivitämme sen itsensä isoilla merkkijonoilla.

Voit ladata tiedoston alla.

Lataa - VBA muuntaa tekstiä pienestä isoksi - xlsm

Joten kyllä ​​kaverit, tällä tavalla voit päivittää pienet tekstit isoiksi. Toivottavasti olin tarpeeksi selittävä. Jos sinulla on epäilyksiä tästä artikkelista tai muista VBA -aiheisiin liittyvistä kyselyistä. Kysy minulta alla olevasta kommenttiosasta.

TRIM -toiminnon käyttäminen Excelissä: TRIM -toimintoa käytetään merkkijonojen leikkaamiseen ja mahdollisten perä- ja etureunojen puhdistamiseen merkkijonosta. Tämä auttaa meitä paljon tietojen puhdistamisessa.

CLEAN -toiminnon käyttäminen Excelissä: Puhdistustoimintoa käytetään tulostamattomien merkkien poistamiseen merkkijonosta. Tätä toimintoa käytetään enimmäkseen TRIM -toiminnon kanssa tuodun ulkomaisen datan puhdistamiseen.

Korvaa teksti merkkijonon lopusta muuttujan sijainnista alkaen: Korvataksesi tekstin merkkijonon lopusta käytämme REPLACE -funktiota. REPLACE -toiminto käyttää tekstin sijaintia merkkijonossa sen korvaamiseksi.

Kuinka tarkistaa, sisältääkö merkkijono yhden monista Excelin teksteistä: Käytämme tätä kaavaa selvittääksesi, sisältääkö merkkijono useita tekstiä. Käytämme SUM -funktiota kaikkien vastaavuuksien yhteenvetoon ja suoritamme sitten logiikan tarkistamaan, sisältääkö merkkijono jotakin useista merkkijonoista.

Laske solut, jotka sisältävät tiettyä tekstiä: Yksinkertainen COUNTIF -toiminto tekee taian. Voit laskea useita soluja, jotka sisältävät tietyn merkkijonon, käyttämällä yleismerkkioperaattoria COUNTIF -funktion kanssa.

Excel KORVAA vs. KORVAA -toiminto: KORVAUS- ja KORVAUS -toiminnot ovat väärinymmärretyt toiminnot. Tietyn tekstin löytämiseksi ja korvaamiseksi käytämme SUBSTITUTE -funktiota. Jos REPLACE -näppäintä käytetään korvaamaan useita merkkijonon merkkejä…

Suosittuja artikkeleita:

50 Excel -pikanäppäintä tuottavuuden lisäämiseksi | Nopeuta tehtävääsi. Nämä 50 pikanäppäintä tekevät työskentelystäsi entistä nopeampaa Excelissä.

Excel VLOOKUP -toiminnon käyttäminen| Tämä on yksi eniten käytetyistä ja suosituimmista Excel -toiminnoista, jota käytetään arvon etsimiseen eri alueilta ja arkeilta.

Kuinka käyttää Excel COUNTIF -toiminto| Laske arvot olosuhteilla käyttämällä tätä hämmästyttävää toimintoa. Sinun ei tarvitse suodattaa tietoja laskeaksesi tiettyjä arvoja. Laskutoiminto on välttämätön kojelaudan valmistelemiseksi.

SUMIF -toiminnon käyttäminen Excelissä | Tämä on toinen kojelaudan olennainen toiminto. Tämä auttaa sinua laskemaan yhteen arvot tietyissä olosuhteissa.