Este tutorial demonstrará como usar as funções UCASE, LCASE e STRCONV no VBA.
Ao trabalhar no VBA, você geralmente precisa converter strings em minúsculas, maiúsculas ou maiúsculas. Isso é possível usando oUCase, LCase e StrConv funções.
Essas funções são importantes ao manipular strings no VBA, pois o VBA é maiúsculas e Minúsculas. Se você deseja tornar o VBA insensível a maiúsculas e minúsculas, você precisa adicionar Option Compare Text na parte superior do seu módulo. Você pode descobrir mais sobre isso aqui: Prevent VBA Case Sensitive
UCase - Converter string em maiúsculas
o UCase A função em VBA converte todas as letras de uma string em maiúsculas. Existe apenas um argumento, que pode ser uma string, uma variável com string ou um valor de célula. Esta função é freqüentemente usada se você deseja comparar duas strings. Aqui está o código para a função UCase:
| 12345678 | Dim strText As StringDim strTextUCase As StringstrText = "executando função maiúscula"strTextUCase = UCase (strText)MsgBox strTextUCase |
No exemplo, queremos converter todas as letras do strText variável para maiúsculas e atribuir a string convertida ao strTextUCase variável. No final, chamamos a caixa de mensagem com a string convertida:
LCase - Converter string em minúsculas
Se você deseja converter todas as letras de uma string em minúsculas, você precisa usar o LCase função. Esta função tem um argumento, o mesmo que UCase. Este é o código para a função LCase:
| 12345678 | Dim strText As StringDim strTextLCase As StringstrText = "EXECUTANDO A FUNÇÃO LowerCASE"strTextLCase = LCase (strText)MsgBox strTextLCase |
Neste exemplo, convertemos todas as letras da string de A1 em minúsculas. Depois disso, a string convertida é atribuída à célula A1.
StrConv - Converter String para Caixa Adequada
o StrConv A função permite que você converta uma string de texto em letras maiúsculas e minúsculas. A função possui dois argumentos. Primeiro é a string que você deseja converter. O segundo é o tipo de conversão que você deseja. Para converter uma string em um caso adequado, você precisa configurá-lo para vbProperCase. O código da função é:
| 12345678 | Dim strText As StringDim strTextProperCase As StringstrText = "executando a função case adequada"strTextProperCase = StrConv (strText, vbProperCase)MsgBox strTextProperCase |
Você verá no exemplo como a função funciona. Ele pega a string da célula B1, converte-a para maiúsculas e minúsculas e retorna o valor na célula A1.
StrConv - Converter string em maiúsculas ou minúsculas
Usando a função StrConv, você também pode converter uma string em maiúsculas ou minúsculas. Para fazer isso, você só precisa definir o segundo argumento para vbUpperCase ou vbLowerCase:
| 1 | strTextConverted = StrConv (strText, vbUpperCase) |
| 1 | strTextConverted = StrConv (strText, vbLowerCase) |
Letras maiúsculas, minúsculas e adequadas do 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.
| 1234 | Private Sub ClientName_AfterUpdate ()'isso irá converter o texto na caixa de nome do cliente para maiúsculasMe.ClientName = UCase (Me.ClientName)End Sub |
