VBA – Forçar Automaticamente Letras Maiúsculas, Minúsculas ou Primeiras Maiúsculas

Written by

Mel Jenkins

Reviewed by

Steve Rynearson

Translated by

Daniel Caramello

Last updated on September 10, 2023

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!

alt text

Saiba mais!

<<Retornar aos exemplos de VBA

vba-free-addin

Exemplos de Add-ins de Códigos VBA

Acesse facilmente todos os exemplos de código que se encontram em nosso site.

Simply navigate to the menu, click, and the code will be inserted directly into your module. .xlam add-in.

(Nenhuma instalação necessária!)

Baixe de Graça

Retornar aos Exemplos de Códigos VBA