Kako pretvoriti mala slova u velika slova za nekoliko stupaca pomoću VBA u programu Microsoft Excel
U ovom ćemo članku naučiti kako pretvoriti tekst u velika slova u određenim stupcima (ne u svim ćelijama) pomoću VBA koda.
Pitanje): Želim kod koji će zamijeniti unos teksta malim slovima velikim slovima u nekim stupcima (ne svi).
Recite da ne želim da se kôd izvodi u stupcima 4, 6, 9, 12 i 13, tj. Ako se u ove stupce unese bilo koji tekst, kôd se neće aktivirati.
Kako biste dobili velika slova dok kucate malim slovima; moramo pokrenuti donje korake za pokretanje VB uređivača
- Kliknite karticu Developer
- Iz grupe kodova odaberite Visual Basic
Kopirajte sljedeći kôd u modul Sheet
Privatni podradni list_Promjena (ByVal cilj kao Excel.Range)
Ako je Target.Column = 4 Ili Target.Column = 6 Ili Target.Column = 9 _
Ili Target.Column = 12 Ili Target.Column = 13 Zatim zatvorite Sub
Uključeno Greška Idi na ErrHandler
Application.EnableEvents = Netačno
Target.Formula = UCase (Target.Formula)
ErrHandler:
Application.EnableEvents = Istina
Kraj podm
- Kod će raditi u listu 1 samo ako je kôd unet u list 1
- Kôd će automatski zamijeniti malo slovo uneseno greškom ili neznanjem odmah velikim slovima u svim stupcima osim 4, 6, 9, 12 i 13.
Na taj način možemo pretvoriti tekst u velika slova u određenim stupcima pomoću VBA koda.
Preuzimanje - Kako pretvoriti mala slova u velika slova - xlsm