Como verificar se o primeiro carácter de uma célula é uma letra ou um número no Excel?
Ao trabalhar com conjuntos de dados extensos no Excel, é frequentemente útil identificar rapidamente se as entradas começam por uma letra, um número ou outro carácter. Por exemplo, em listas com códigos, endereços ou formatos mistos, poderá precisar de validar o formato ou categorizar os dados com base no primeiro carácter para processamento posterior. Embora o Excel não inclua uma função incorporada para esta verificação específica, pode executá-la facilmente com fórmulas — e, em alguns casos, com abordagens alternativas, como o uso de VBA. Os métodos abaixo oferecem passos claros e dicas práticas para verificar de forma fiável o primeiro carácter de uma célula.
Verificar se o primeiro carácter numa célula é uma letra ou um número com fórmula
Solução alternativa com código VBA
Verificar se o primeiro carácter numa célula é uma letra ou um número com fórmula
As fórmulas do Excel facilitam a identificação de se o primeiro carácter numa célula é uma letra, um número ou qualquer outro tipo de carácter.
1. Selecione uma célula vazia onde deseje apresentar o resultado, introduza a seguinte fórmula na Barra de Fórmulas e, em seguida, prima a tecla Enter para confirmar:
=IF(ISERR(LEFT(A2,1)*1),"letter","number")Esta fórmula verifica o primeiro carácter da célula A2. Se a sua multiplicação por 1 gerar um erro, significa que o carácter não é um número — nesse caso, a fórmula devolve «letter». Caso contrário, devolve «number».
Dica: Certifique-se de que a fórmula faz referência à célula correta. Na fórmula acima, A2 é a célula que contém o valor que pretende verificar.
2. Após confirmar a fórmula na primeira célula, aplique-a rapidamente às restantes linhas: com a célula do resultado selecionada, arraste a alça de preenchimento para baixo para preencher automaticamente as células correspondentes na coluna.
Os seus resultados mostrarão «letter» se o primeiro carácter for uma letra e «number» se for um dígito numérico, conforme ilustrado abaixo:
Explicação dos parâmetros e notas práticas: A fórmula funciona bem com células que começam por letras latinas padrão ou dígitos numéricos. Contudo, poderá devolver «letter» para qualquer carácter que não possa ser convertido em número — o que pode incluir alguns símbolos especiais ou caracteres Unicode. Se o seu conjunto de dados contiver entradas que comecem com esses caracteres, é mais seguro utilizar uma fórmula de deteção mais precisa, conforme descrita abaixo.
Se considerar que as células podem começar por pontuação, símbolos ou outros caracteres não alfanuméricos, utilize esta fórmula melhorada para categorizar os resultados como «Letter», «Number» ou «Other»:
=IF(A2="","",IF(AND(CODE(LEFT(A2,1))>=48,CODE(LEFT(A2,1))<=57),"Number",IF(OR(AND(CODE(LEFT(A2,1))>=65,CODE(LEFT(A2,1))<=90),AND(CODE(LEFT(A2,1))>=97,CODE(LEFT(A2,1))<=122)),"Letter","Other")))Esta fórmula começa por verificar se a célula está vazia. Caso contrário, analisa o valor ASCII do primeiro carácter: os números correspondem aos códigos 48 a 57, as letras maiúsculas aos códigos 65 a 90 e as letras minúsculas aos códigos 97 a 122. Qualquer valor fora destes intervalos devolve «Other».
Solução alternativa com código VBA
Para utilizações avançadas, como operações em lote ou a integração de verificações de caracteres numa tarefa personalizada, pode recorrer a uma macro VBA simples para avaliar automaticamente o primeiro carácter das células selecionadas e classificá-las como «Letter», «Number» ou «Other». Esta abordagem é ideal para utilizadores familiarizados com macros e com a execução de tarefas repetitivas em larga escala.
1. Abra o Editor do VBA clicando em Ferramentas de Programador > Visual Basic. Na nova janela Microsoft Visual Basic para Aplicações que aparecer, clique em Inserir > Módulo e cole o seguinte código no módulo:
Sub CheckFirstCharacterType()
Dim rng As Range
Dim cell As Range
Dim firstChar As String
Dim codeNum As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set rng = Application.InputBox("Select range to check", xTitleId, rng.Address, Type:=8)
For Each cell In rng
If cell.Value <> "" Then
firstChar = Left(cell.Value, 1)
codeNum = Asc(firstChar)
If codeNum >= 48 And codeNum <= 57 Then
cell.Offset(0, 1).Value = "Number"
ElseIf (codeNum >= 65 And codeNum <= 90) Or (codeNum >= 97 And codeNum <= 122) Then
cell.Offset(0, 1).Value = "Letter"
Else
cell.Offset(0, 1).Value = "Other"
End If
Else
cell.Offset(0, 1).Value = ""
End If
Next cell
End Sub2. Após colar o código, clique no botão 
ou prima F5 para executar. Aparecerá uma mensagem a solicitar que selecione o intervalo que pretende verificar. Assim que confirmar, a macro analisará cada célula da sua seleção e apresentará o resultado («Number», «Letter» ou «Other») na coluna imediatamente à direita dos seus dados.
Dicas práticas: Se a sua folha de cálculo já contiver fórmulas ou formatação em colunas adjacentes, ajuste cell.Offset(0,1) conforme necessário para apresentar os resultados noutra coluna.
- As macros conseguem processar grandes intervalos muito mais rapidamente do que a cópia manual de fórmulas, minimizando potenciais erros.
- Guarde sempre a sua pasta de trabalho antes de executar novo código VBA para evitar alterações não intencionais.
Desbloqueie a Magia do Excel com KUTOOLS AI
- Execução Inteligente: Realize operações em células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
- fórmulas personalizadas: Crie fórmulas personalizadas para simplificar os seus fluxos de trabalho.
- Programação VBA: Escreva e implemente código VBA com facilidade.
- Interpretação de Fórmulas: Compreenda facilmente fórmulas complexas.
- Tradução de Texto: Elimine barreiras linguísticas nas suas folhas de cálculo.
Artigos relacionados:
- Como verificar se um determinado nome de célula existe no Excel?
- Como verificar se o valor de uma célula está entre dois valores no Excel?
- Como verificar se uma célula começa ou termina com um carácter específico no Excel?
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