Como converter strings para maiúsculas e minúsculas usando vba

Uma string tem maiúsculas e minúsculas corretas se a primeira letra de cada palavra na string estiver maiúscula e todas as outras letras de cada palavra estiverem minúsculas.

Você pode usar a seguinte sintaxe no VBA para converter um intervalo de células com strings para o caso correto:

 Sub ConvertToProperCase()
    
    Dim i As Integer

    For i = 2 To 10
        Range(" B " & i) = StrConv(Range(" A " & i), vbProperCase)
    Next i
    
End Sub

Este exemplo específico converterá cada string no intervalo A2:A10 para o caso apropriado e exibirá os resultados no intervalo B2:B10 .

O exemplo a seguir mostra como usar essa sintaxe na prática.

Exemplo: converter strings em maiúsculas e minúsculas usando VBA

Suponha que temos a seguinte coluna de strings no Excel:

Suponha que queiramos converter cada string na coluna A para o caso correto e exibir os resultados na coluna B:

Podemos criar a seguinte macro para fazer isso:

 Sub ConvertToProperCase()
    
    Dim i As Integer

    For i = 2 To 10
        Range(" B " & i) = StrConv(Range(" A " & i), vbProperCase)
    Next i
    
End Sub

Quando executamos esta macro, recebemos a seguinte saída:

A coluna B exibe cada string na coluna A no caso apropriado.

Nota : Você pode encontrar a documentação completa da função StrConv em VBA aqui .

Recursos adicionais

Os tutoriais a seguir explicam como realizar outras tarefas comuns em VBA:

Como comparar strings em VBA
Como remover espaços de uma string em VBA
Como substituir caracteres em uma string no VBA