Como encontrar rapidamente a posição da primeira letra maiúscula em uma string de texto no Excel?
Suponha que haja uma lista de strings de texto misturadas com números, letras maiúsculas e minúsculas. Como você pode encontrar rapidamente a posição da primeira letra maiúscula nas strings? Neste artigo, apresento alguns truques que podem especificar rapidamente a posição da primeira letra maiúscula sem contá-las manualmente no Excel.
Encontrar a posição da primeira letra maiúscula na string com fórmula
Encontrar a posição da primeira letra maiúscula na string com Função Definida
Alterar todas as letras para MAIÚSCULAS ou Primeira Letra Maiúscula com Kutools para Excel
Encontrar a posição da primeira letra maiúscula na string com fórmula
Aqui está uma fórmula que pode ajudá-lo a encontrar rapidamente a posição da primeira letra maiúscula na string; por favor, faça o seguinte:
Selecione uma célula em branco ao lado da string onde deseja encontrar a primeira letra maiúscula, B1, por exemplo, e insira esta fórmula =MIN(SE(ÉERRO(PROCURAR(CARACT(LIN(INDIRETO("65:90")));A1));"";PROCURAR(CARACT(LIN(INDIRETO("65:90")));A1)))
Pressione Shift + Ctrl + Enter para obter o resultado correto, e depois arraste a alça de preenchimento automático sobre as células onde deseja aplicar essa fórmula. Veja a captura de tela:
Encontrar a posição da primeira letra maiúscula na string com Função Definida
Além da fórmula, você também pode usar uma Função Definida para descobrir a posição da primeira letra maiúscula na string.
1. Ative a planilha que contém a string onde deseja encontrar a letra maiúscula e pressione Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.
2. Clique com o botão direito do mouse na planilha onde deseja usar o código no painel Explorador de Projetos, e clique em Inserir > Módulo, e cole o código abaixo no script do Módulo em branco. Veja a captura de tela:
Código: Encontre a posição da primeira letra maiúscula na string.
Function GetFirstUpper(Rg As Range) As Integer
'UpdatebyExtendoffice20160726
Dim xStr As String
Dim I As Integer
Application.Volatile
GetFirstUpper = -1
On Error Resume Next
xStr = Trim(Rg.Value)
For I = 1 To Len(xStr)
If (Asc(Mid(xStr, I, 1)) < 91) And (Asc(Mid(xStr, I, 1)) > 64) Then
GetFirstUpper = I
Exit Function
End If
Next
End Function
3. Salve o código e volte para a planilha que está usando, e selecione uma célula em branco ao lado da string onde deseja encontrar a letra maiúscula, insira esta fórmula =GetFirstUpper(F1), pressione Enter e, em seguida, arraste a alça de preenchimento automático sobre as células onde deseja aplicar essa fórmula. Veja a captura de tela:
Dica: Se não houver nenhuma letra maiúscula na string, o resultado será exibido como -1.
Alterar todas as letras para MAIÚSCULAS ou Primeira Letra Maiúscula com Kutools para Excel
No trabalho geral do Excel, você pode precisar alterar frequentemente strings de letras para MAIÚSCULAS, Primeira Letra Maiúscula, minúsculas, caso de frase ou ToGgLe CaSe, conforme mostrado na captura de tela abaixo.
Com o Kutools para Excel, você pode aplicar sua ferramenta Alterar Formato para alterar rapidamente o formato das letras conforme necessário.
Após a instalação gratuita do Kutools para Excel, siga os passos abaixo:
1. Selecione as strings cujo formato deseja alterar e clique em Kutools > Texto > Alterar Formato. Veja a captura de tela:
2. Em seguida, na janela pop-up Alterar Formato diálogo, marque a opção desejada na seção Alterar Tipo e você pode visualizar o resultado no painel Visualização. Veja a captura de tela:
3. Em seguida, clique em Ok ou Aplicar para alterar o formato.
Kutools para Excel - Potencialize o Excel com mais de 300 ferramentas essenciais. Aproveite recursos de IA permanentemente gratuitos! Obtenha Agora
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência sem igual. Kutools para Excel oferece mais de300 recursos avançados para aumentar sua produtividade e economizar tempo.Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface de abas para o Office e facilita muito seu trabalho
- Habilite a edição e leitura com abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas abas da mesma janela, em vez de novas janelas.
- Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!