Muunna pienet kirjaimet isoiksi isoiksi joillekin sarakkeille

Anonim

Kuinka muuntaa pienet kirjaimet isoiksi kirjaimiksi muutamille sarakkeille VBA: n avulla Microsoft Excelissä

Tässä artikkelissa opimme muuttamaan tekstin isoiksi kirjaimiksi tietyissä sarakkeissa (ei kaikissa soluissa) VBA -koodin avulla.

Kysymys): Haluan koodin, joka korvaa pienillä kirjaimilla kirjoitetun tekstin isoilla kirjaimilla joissakin sarakkeissa (ei kaikissa).

Sano, etten halua koodin toimivan sarakkeissa 4, 6, 9, 12 ja 13 eli jos näihin sarakkeisiin syötetään tekstiä, koodia ei laukaista.

Jotta saat isot kirjaimet kirjoittaessasi pienillä kirjaimilla; meidän on noudatettava alla olevia vaiheita VB -editorin käynnistämiseksi

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

Kopioi seuraava koodi Sheet -moduulissa

Yksityinen alityöarkin_muutos (ByVal -kohde Excel.Range -muodossa)

Jos Target.Column = 4 Tai Target.Column = 6 Tai Target.Column = 9 _

Tai Target.Column = 12 Tai Target.Column = 13 Sitten Lopeta Sub

Virhe GoTo ErrHandler

Application.EnableEvents = Väärä

Target.Formula = UCase (Target.Formula)

ErrHandler:

Application.EnableEvents = Totta

End Sub

  • Koodi toimii taulukossa 1 vain, kun koodi syötetään taulukkoon 1
  • Koodi korvaa automaattisesti vahingossa tai tietämättömyydestä kirjoitetun pienen kirjaimen välittömästi isoiksi kirjaimiksi kaikissa sarakkeissa paitsi 4, 6, 9, 12 ja 13.

Tällä tavalla voimme muuntaa tekstin tiettyjen sarakkeiden kirjaimiksi VBA -koodin avulla.

Lataa - Kuinka muuntaa pienet kirjaimet isoiksi kirjaimiksi - xlsm