Kuidas teisendada väikesi tähti suureks täheks mõne veeru jaoks, kasutades Microsoft Excelis VBA -d
Selles artiklis õpime, kuidas VBA -koodi abil teksti teatud veergudes (mitte kõikides lahtrites) suurtähtedeks teisendada.
Küsimus): Soovin koodi, mis asendab väikeste veergudega sisestatud teksti mõnes veerus (mitte kõigis).
Ütle, et ma ei taha, et kood töötaks veergudel 4, 6, 9, 12 ja 13, st kui nendesse veergudesse sisestatakse tekst, siis koodi ei käivitata.
Väikeste tähtede sisestamisel suurtähtede saamiseks; VB redaktori käivitamiseks peame järgima alltoodud samme
- Klõpsake vahekaarti Arendaja
- Valige koodirühmas Visual Basic
Kopeerige lehtmoodulis järgmine kood
Privaatne alamlehe muutmine (ByVal Target nagu Excel.Range)
Kui Target.Column = 4 Või Target.Column = 6 Või Target.Column = 9 _
Või Target.Column = 12 Või Target.Column = 13 Seejärel väljuge alamast
Viga GoTo ErrHandler
Application.EnableEvents = Vale
Target.Formula = UCase (Target.Formula)
ErrHandler:
Application.EnableEvents = Tõsi
End Sub
- Kood töötab lehel 1 ainult siis, kui kood on sisestatud lehele 1
- Kood asendab ekslikult või teadmatuses sisestatud väikese tähe automaatselt suurtäheks kõikides veergudes, välja arvatud 4, 6, 9, 12 ja 13.
Sel viisil saame VBA koodi kasutades teisendada teksti teatud veergude suurtähtedeks.
Lae alla - Kuidas teisendada väikesi tähti suurtähtedeks - xlsm