Hvordan konvertere små bokstaver til store bokstaver for få kolonner ved hjelp av VBA i Microsoft Excel
I denne artikkelen lærer vi hvordan du konverterer tekst til store bokstaver i spesifikke kolonner (ikke alle celler) ved hjelp av VBA -kode.
Spørsmål): Jeg vil ha kode som vil erstatte teksten med små bokstaver i store bokstaver i noen kolonner (ikke alle).
Si at jeg ikke vil at koden skal kjøres på kolonnene 4, 6, 9, 12 og 13, dvs. hvis det skrives inn tekst i disse kolonnene, blir ikke koden utløst.
For å få store bokstaver mens du skriver med små bokstaver; vi må følge trinnene nedenfor for å starte VB -editor
- Klikk på kategorien Utvikler
- Velg Visual Basic fra kodegruppen
Kopier følgende kode i Sheet -modulen
Private Sub Worksheet_Change (ByVal Target As Excel.Range)
Hvis Target.Column = 4 Eller Target.Column = 6 Eller Target.Column = 9 _
Eller Target.Column = 12 Eller Target.Column = 13 Deretter avslutter du Sub
Ved feil GoTo ErrHandler
Application.EnableEvents = Falsk
Target.Formula = UCase (Target.Formula)
ErrHandler:
Application.EnableEvents = True
Slutt Sub
- Koden fungerer bare i ark1 når koden er angitt i ark1
- Koden vil automatisk erstatte den lille bokstaven som er skrevet ved en feil eller i uvitenhet umiddelbart til store bokstaver i alle kolonner unntatt 4, 6, 9, 12 og 13.
På denne måten kan vi konvertere tekst til caps i bestemte kolonner ved hjelp av VBA -kode.
Last ned - Hvordan konvertere små bokstaver til store bokstaver - xlsm