Como converter letras pequenas em letras maiúsculas para algumas colunas usando o VBA no Microsoft Excel
Neste artigo, aprenderemos como converter texto em letras maiúsculas em colunas específicas (nem todas as células) usando o código VBA.
Pergunta): Quero um código que substituirá o texto inserido em letras minúsculas em maiúsculas em algumas colunas (nem todas).
Digamos que eu não queira que o código seja executado nas colunas 4, 6, 9, 12 e 13, ou seja, se algum texto for inserido nessas colunas, o código não será acionado.
Para obter as letras maiúsculas conforme você digita; precisamos seguir os passos abaixo para lançar o editor VB
- Clique na guia Desenvolvedor
- No grupo Código, selecione Visual Basic
Copie o seguinte código no módulo de planilha
Sub planilha privada_Change (ByVal Target As Excel.Range)
Se Target.Column = 4 Ou Target.Column = 6 Ou Target.Column = 9 _
Ou Target.Column = 12 Ou Target.Column = 13 Então Saia do Sub
On Error GoTo ErrHandler
Application.EnableEvents = False
Target.Formula = UCase (Target.Formula)
ErrHandler:
Application.EnableEvents = True
End Sub
- O código funcionará na folha1 apenas quando o código for inserido na folha1
- O código substituirá automaticamente a letra minúscula digitada por engano ou por ignorância pela letra maiúscula em todas as colunas, exceto 4, 6, 9, 12 e 13.
Dessa forma, podemos converter texto em maiúsculas em colunas específicas usando o código VBA.
Download - Como converter letras pequenas em letras maiúsculas - xlsm
