VBA LCase funkcija | Konvertējiet tekstu uz mazajiem burtiem, izmantojot VBA

Excel VBA LCase funkcija

LCase ir iebūvēta funkcija vba, ko izmanto, lai pārveidotu ievades virkni, kas tai tiek nodrošināta ar mazajiem burtiem, ir nepieciešams viens arguments, kas ir virkne kā ievade, un šīs funkcijas radītā izeja ir virkne, kas jāpatur Paturiet prātā, ka šī funkcija visu funkciju pārvērš par mazajiem burtiem, nevis tikai uz atsevišķu rakstzīmi.

Jums noteikti ir jāizmēģina tā pati formula (LOWER), kas ir izcila VBA, un jūs to neesat atradis. Jo VBA mazie burti tiek nosaukti nedaudz atšķirīgi. VBA tas ir saīsnes nosaukumā, ti, “LCASE”. Šeit “L” apzīmē “LOWER”, tāpēc formula ir “LOWERCASE”.

Sintakse

  • Virkne: nav nekas cits kā teksta vērtība, kuru mēs mēģinām pārveidot par mazajiem burtiem. Mēs varam piegādāt tekstu tieši formulai, tā var būt šūnas atsauce, un tā var būt arī caur mainīgo.

Kā konvertēt tekstu ar mazajiem burtiem VBA?

Šo VBA LCase Excel veidni varat lejupielādēt šeit - VBA LCase Excel veidne

1. piemērs

Mēģināsim konvertēt teksta vērtību “Labdien, labrīt” uz mazajiem burtiem, izmantojot funkciju LCASE.

1. darbība: sāciet apakšprocedūru, nosaucot Excel makro.

Kods:

 Apakškopa LCase_Piemērs1 () Beigu apakšgrupa 

2. solis: Paziņojiet mainīgo k kā virkni.

Kods:

 Sub LCase_Example1 () Dim k As String End Sub 

3. darbība: piešķiriet vērtību mainīgajam “k”, izmantojot funkciju “LCASE”.

4. solis: Šeit virkne ir mūsu vēlamā teksta vērtība, kuru mēs cenšamies konvertēt mazajiem burtiem, un vēlamā virknes vērtība ir “Hello Good Morning”.

Kods:

 Sub LCase_Example1 () Dim k As String k = LCase ("Labdien, labrīt") Beigas Sub 

5. solis: Tagad ziņojuma lodziņā parādiet mainīgā “k” rezultātu.

Kods:

 Sub LCase_Example1 () Dim k As String k = LCase ("Labdien, labrīt") MsgBox k End Sub 

Ok, kodēšana ir pabeigta. Palaidīsim kodu, lai redzētu rezultātu.

Tātad, izmantojot vienkāršu kodēšanas tehniku, LCase konvertēja teksta vērtību “Labdien, labrīt” uz “sveiks, labrīt”.

2. piemērs

Mēs esam redzējuši, kā VBA darbojas LCASE funkcija. Iepriekš minētajā piemērā mēs tieši piegādājām vērtību pašai formulai. Tagad mēs redzēsim, kā mēs varam izmantot šūnu atsauces vērtību formulai.

Pieņemsim, ka šūnā A1 ir vārds “Labdien, labrīt”, piemēram, zemāk redzamais attēls.

1. darbība: mēs pārveidosim šūnas A1 vērtību mazajiem burtiem, parādot rezultātu B1 diapazona šūnā, tāpēc kods būs diapazons (“B1”).

Kods:

 Apakšvirs LCase_Piemērs2 () Diapazons ("B1"). Vērtība Beigas Apakš 

2. solis: šūnā B1 līdz LCASE funkcijai mēs saglabāsim rezultātu, tāpēc atveriet funkciju.

3. solis: Šajā piemērā VBA virknes vērtība ir šūnas atsauce, nevis tieša vērtība. Tāpēc norādiet šūnas atsauci kā diapazonu (“A1”).

Kods:

 Sub LCase_Example2 () diapazons ("B1"). Vērtība = LCase (Range ("A1"). Vērtība) Beigas Sub 

Tātad, labi, mēs esam pabeiguši VBA kodēšanas daļu. Palaidiet kodu un skatiet burvību B1 šūnā.

3. piemērs

Vienas šūnas vērtības vai vienas tiešas vērtības konvertēšana nav lielākais izaicinājums. Kad mums ir jārisina “n” vērtību skaits darblapā, mums jāpielieto cilpas, lai apietu visas šūnas un pārveidotu tās par mazo burtu vērtībām.

Pieņemsim, ka zemāk ir dati, kas jums ir Excel darblapā.

Ja jūs nezināt par cilpām, jums jāatgriežas pie VBA kodēšanas pamatiem. Skatiet mūsu rakstus par “VBA cilpām”, lai iegūtu pietiekami daudz zināšanu par cilpām. Zemāk esošais kods pārveidos iepriekš minētos vārdus mazajiem burtiem.

Kods:

 Sub LCase_Example3 () Dim k As Long For k = 2 līdz 8 šūnas (k, 2). Vērtība = LCase (šūnas (k, 1). Vērtība) Nākamais k Beigas Sub 

Tas pārveidos visas teksta vērtības no 2. rindas uz 8. rindu mazo burtu funkcijā.

Pamatojoties uz jūsu šūnām, jūs varat palielināt cilpas robežu no 8 līdz jebkuram pēdējam datu rindas skaitam.


$config[zx-auto] not found$config[zx-overlay] not found