Como encontrar rapidamente a posição da primeira maiúscula na seqüência de texto do Excel?
Supondo 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 das strings? Neste artigo, apresento os truques que podem especificar rapidamente a posição da primeira maiúscula sem contá-los um a um manualmente no Excel.
Encontre a posição da primeira maiúscula na string com a fórmula
Encontre a posição da primeira maiúscula na string com a função definida
Altere todas as letras para MAIÚSCULAS ou maiúsculas com o Kutools para Excel
Encontre a posição da primeira maiúscula na string com a fórmula
Aqui está uma fórmula que pode ajudá-lo a encontrar rapidamente a posição da primeira maiúscula da string. Faça o seguinte:
Selecione uma célula em branco ao lado da string que você deseja encontrar a primeira maiúscula, B1 por exemplo, insira esta fórmula =MIN(IF(ISERROR(FIND(CHAR(ROW(INDIRECT("65:90"))),A1)),"",FIND(CHAR(ROW(INDIRECT("65:90"))),A1)))
Press Shift + Ctrl + Enter para obter o resultado correto e, em seguida, arraste a alça de preenchimento automático sobre as células que precisaram aplicar esta fórmula. Veja a imagem:
Encontre a posição da primeira maiúscula na string com a função definida
Exceto a fórmula, você também pode usar a Função Definida para descobrir a posição da primeira maiúscula na string.
1. Habilite a folha que contém a string que você deseja encontrar em maiúsculas e pressione Alt + F11 chaves para abrir Microsoft Visual Basic para Aplicações janela.
2. Clique com o botão direito na folha em que deseja usar o código Explorar Projeto painel e clique em inserção > Móduloe cole o código abaixo no script do módulo em branco. Veja a imagem:
Código: Encontre a posição da primeira maiúscula da 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 você usa e selecione uma célula em branco ao lado da string que deseja localizar em maiúsculas, insira esta fórmula = GetFirstUpper (F1), pressione Entrar e arraste a alça de preenchimento automático sobre as células necessárias a esta fórmula. Veja a imagem:
Dica: Se não houver letras maiúsculas na string, o resultado será exibido como -1.
Altere todas as letras para MAIÚSCULAS ou maiúsculas com o Kutools para Excel
No trabalho geral do Excel, você geralmente precisa alterar as sequências de letras para MAIÚSCULAS, Caixa apropriada, caixa baixa, caixa de frase ou caixa de texto conforme mostrado abaixo.
Com o Kutools para Excel, você pode aplicar seu Caso de mudança utilitário para alterar rapidamente a caixa das letras conforme necessário.
Kutools for Excel, com mais de 300 funções úteis, tornam seus trabalhos mais fáceis. |
Depois de instalação grátis Kutools para Excel, faça o seguinte:
1. Selecione as strings que deseja alterar em seus casos e clique em Kutools > Texto > Caso de mudança. Veja a imagem:
2. Em seguida, no popping Caso de mudança caixa de diálogo, marque a opção que você deseja no Alterar tipo seção, e você pode visualizar o resultado da alteração no painel de visualização. Veja a imagem:
3. Então clique Ok or Inscreva-se para mudar o caso.
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!