VBA – Funções de Maiúsculas e Minúsculas

Este tutorial demonstrará como usar as funções UCASE, LCASE e STRCONV no VBA.

Ao trabalhar no VBA, muitas vezes você precisa converter cadeias de caracteres em minúsculas, maiúsculas ou  primeiras letras maiúsculas. Isso é possível com o uso das funções UCase, LCase e StrConv.

Essas funções são importantes ao manipular cadeias de caracteres no VBA, pois o VBA diferencia maiúsculas de minúsculas. Se quiser tornar o VBA insensível a maiúsculas e minúsculas, você precisará adicionara Option Compare Text na parte superior do módulo. Você pode saber mais sobre isso aqui: Evitar que o VBA diferencie maiúsculas de minúsculas

UCase – Converter Texto em Maiúsculas

A função UCase no VBA converte todas as letras de uma cadeia de caracteres em maiúsculas. Há apenas um argumento, que pode ser uma cadeia de caracteres, uma variável com cadeia de caracteres ou um valor de célula. Essa função é usada com frequência se você quiser comparar duas cadeias de caracteres. Aqui está o código da função UCase:

Dim strTexto As String
Dim strTextoMaiuscula As String

strTexto = "rodando função Maiúscula"

strTextoMaiuscula = UCase(strTexto)

MsgBox strTextoMaiuscula 

No exemplo, queremos converter todas as letras da variável strTexto em maiúsculas e atribuir a cadeia de caracteres convertida à variável strTextoMaiuscula. No final, chamamos a caixa de mensagem com a cadeia de caracteres convertida:

LCase – Converter Texto em Minúsculas

Se quiser converter todas as letras de uma cadeia de caracteres em minúsculas, você precisará usar a função LCase. Essa função tem um argumento, o mesmo que o UCase. Este é o código da função LCase:

Dim strTexto As String
Dim strTextoMinuscula As String

strTexto  = "RODANDO função MINÚSCULA"

strTextoMinuscula = LCase(strTexto)

MsgBox strTextoMinuscula

Neste exemplo, convertemos todas as letras da variável de cadeia de caracteres strText em minúsculas. Depois disso, a string convertida é atribuída à variável strTextLCase.

StrConv – Converter Texto para Primeira Maiúscula

A função StrConv permite que você converta a primeira letra de cada palavra em maiúscula e o restante em minúscula. A função tem dois argumentos. O primeiro é a cadeia de caracteres que você deseja converter. O segundo é o tipo de conversão que você deseja. Para converter uma cadeia de caracteres em primeira maiúscula, você precisa defini-la como vbProperCase. O código da função é:

Dim strTexto As String
Dim strPrimMaiuscula As String
    
strTexto = "rodando função primeira maiúscula"
    
strPrimMaiuscula = StrConv(strTexto, vbProperCase)
    
MsgBox strPrimMaiuscula

Você verá no exemplo como a função funciona. Ela pega a string da célula B1, converte-a em primeira letra maiúsculas e retorna o valor na célula A1.

StrConv – Converter Texto em Maiúsculas ou Minúsculas

Usando a função StrConv, você também pode converter uma cadeia de caracteres em maiúsculas ou minúsculas. Para fazer isso, basta definir o segundo argumento como vbUpperCase ou vbLowerCase:

strTextoConvertido = StrConv(strTexto, vbUpperCase)

strTextoConvertido = StrConv(strTexto, vbLowerCase)

VBA – Funções de Maiúsculas e Minúsculas no Access

Todos os exemplos acima funcionam exatamente da mesma forma no Access VBA e no Excel VBA.

Private Sub ClienteNome_AfterUpdate()
   'isso converterá o texto na caixa de nome do cliente em letras maiúsculas
   Me.ClienteNome = UCase(Me.ClienteNome)
End Sub