Como encontrar rapidamente a posição da primeira letra maiúscula numa cadeia de texto no Excel?
Suponha que tenha uma lista de cadeias de texto com uma mistura de números, letras maiúsculas e minúsculas. Como pode encontrar rapidamente a posição da primeira letra maiúscula em cada cadeia? Neste artigo, apresentamos truques práticos para identificar de imediato a posição da primeira letra maiúscula — sem precisar contá-las manualmente, uma a uma, no Excel.
Encontrar a posição da primeira letra maiúscula na cadeia com fórmula
Encontrar a posição da primeira letra maiúscula na cadeia com Função Definida
Alterar todas as letras para MAIÚSCULAS ou Primeira Letra em Maiúscula com Kutools para Excel 
Encontrar a posição da primeira letra maiúscula na cadeia com fórmula
Aqui está uma fórmula que o ajuda a encontrar rapidamente a posição da primeira letra maiúscula na cadeia. Siga os passos abaixo:
Selecione uma célula vazia junto à cadeia em que pretende encontrar a primeira letra maiúscula, por exemplo B1, e introduza esta fórmula =MIN(IF(ISERROR(FIND(CHAR(ROW(INDIRECT("65:90"))),A1)),«»,FIND(CHAR(ROW(INDIRECT("65:90"))),A1)))
Prima Shift + Ctrl + Enter para obter o resultado correto e, em seguida, arraste a alça de preenchimento automático pelas células onde pretende aplicar esta fórmula. Veja a imagem:
Encontrar a posição da primeira letra maiúscula na cadeia com Função Definida
Além da fórmula, pode também recorrer a uma Função Definida para identificar a posição da primeira letra maiúscula na cadeia.
1. Ative a folha que contém a cadeia em que pretende encontrar letras maiúsculas e prima Alt + F11 para abrir a janela Microsoft Visual Basic para Aplicações.
2. Clique com o botão direito do rato na folha onde pretende utilizar o código no painel Explorador de Projetos e clique em Inserir > Módulo. Depois, cole o código seguinte no script vazio do Módulo. Veja a imagem:
Código: Encontre a posição da primeira letra maiúscula na cadeia.
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. Guarde o código e regresse à folha em uso. Selecione uma célula vazia junto à cadeia onde pretende identificar letras maiúsculas e introduza a seguinte fórmula: =GetFirstUpper(F1). Prima Enter e, em seguida, arraste a alça de preenchimento automático pelas células onde precisar desta fórmula. Veja a imagem:
Dica: Se a cadeia não contiver nenhuma letra maiúscula, o resultado será apresentado como -1.
Alterar todas as letras para MAIÚSCULAS ou Primeira Letra em Maiúscula com Kutools para Excel
No trabalho diário com o Excel, poderá frequentemente precisar de converter cadeias de texto para MAIÚSCULAS, Primeira Letra em Maiúscula, minúsculas, Primeira Letra da Frase em Maiúscula ou Inverter Maiúsculas e Minúsculas, conforme ilustrado na imagem seguinte.
Com o Kutools para Excel, pode utilizar a sua funcionalidade Alterar Maiúsculas e Minúsculas para alterar rapidamente as maiúsculas e minúsculas conforme necessário.
Após instalar gratuitamenteKutools para Excel, siga os passos abaixo:
1. Selecione as cadeias cujas maiúsculas e minúsculas pretende alterar e clique em Kutools > Texto > Alterar Maiúsculas e Minúsculas. Veja a imagem:
2. Em seguida, na caixa de diálogo Alterar Maiúsculas e Minúsculas que surge, selecione a opção pretendida na secção Alterar Tipo e pré-visualize o resultado no painel Pré-visualização. Veja a imagem:
3. Depois, clique em Ok ou em Aplicar para alterar maiúsculas e minúsculas.
Kutools para Excel– Potencie o Excel com mais de 300 ferramentas essenciais, tornando o seu trabalho mais rápido e fácil, e aproveite as funcionalidades de IA para um processamento de dados mais inteligente e uma maior produtividade.Obtenha Já
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos