VBA – Forçar Automaticamente Letras Maiúsculas, Minúsculas ou Primeiras Maiúsculas
In this Article
Você precisa alterar automaticamente o texto de uma célula para Maiúsculas, Minúsculas ou Primeiras Maiúsculas depois que o usuário o insere? Há várias maneiras de fazer isso e vários requisitos possíveis. Aqui está um exemplo que altera automaticamente tudo após a entrada em uma determinada coluna. Esperamos que você possa usar esse exemplo como base!
1. Pressione ALT e F11 para abrir a janela de código.
2. Clique duas vezes no nome da planilha que você deseja alterar automaticamente
mudar as letras.
3. Coloque esse código na janela de código.
Alterar Texto para Primeiras Maiúsculas
Código para Primeiras Maiúsculas
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Application.EnableEvents = False
If Target.Column = 5 Then
Target = StrConv(Target, vbProperCase)
End If
Application.EnableEvents = True
End Sub
Alterar o Texto para Maiúsculas
Para Maiúsculas, você pode alterar
StrConv(Target, vbProperCase)
para
Ucase(Target)
Alterar o Texto para Minúsculas
Para minúsculas, você pode alterar
StrConv(Target, vbProperCase)
para
Lcase(Target)
Codificação VBA facilitada
Pare de procurar códigos VBA on-line. Saiba mais sobre o AutoMacro – um construtor de código VBA que permite que os iniciantes codifiquem procedimentos do zero com o mínimo de conhecimento de codificação e com muitos recursos que economizam tempo para todos os usuários!