Sådan konverteres små bogstaver til store bogstaver til få kolonner ved hjælp af VBA i Microsoft Excel
I denne artikel lærer vi, hvordan du konverterer tekst til store bogstaver i bestemte kolonner (ikke alle celler) ved hjælp af VBA -kode.
Spørgsmål): Jeg vil have kode, der erstatter teksten med små bogstaver i store bogstaver i nogle kolonner (ikke alle).
Sig, jeg ikke vil have koden til at køre på kolonner 4, 6, 9, 12 og 13, dvs. hvis der er indtastet tekst i disse kolonner, vil koden ikke blive udløst.
For at få store bogstaver, mens du skriver med små bogstaver; vi skal følge nedenstående trin for at starte VB -editor
- Klik på fanen Udvikler
- Vælg Visual Basic i kodegruppen
Kopier følgende kode i arkmodul
Privat underarbejdsark_ændring (ByVal -mål som Excel.Range)
Hvis Target.Column = 4 Eller Target.Column = 6 Eller Target.Column = 9 _
Eller Target.Column = 12 Eller Target.Column = 13 Afslut derefter Sub
Ved fejl GoTo ErrHandler
Application.EnableEvents = Falsk
Target.Formula = UCase (Target.Formula)
ErrHandler:
Application.EnableEvents = True
Afslut Sub
- Koden fungerer kun i ark1, når koden er indtastet i ark1
- Koden erstatter automatisk det lille bogstav, der er indtastet ved en fejl eller uvidenhed, med det samme i store bogstaver i alle kolonner undtagen 4, 6, 9, 12 og 13.
På denne måde kan vi konvertere tekst til caps i bestemte kolonner ved hjælp af VBA -kode.
Download - Sådan konverteres små bogstaver til store bogstaver - xlsm