Como manter ou remover zeros à esquerda no Excel?
Ao trabalhar com o Excel, poderá notar que, ao introduzir um número com zeros à esquerda — como 00032423 —, a célula frequentemente exibe apenas 32423. O Excel remove automaticamente esses zeros porque, do ponto de vista matemático, não têm valor. Contudo, em muitas situações reais — como códigos de funcionários, referências de produtos ou importações de dados formatados — é essencial manter (ou, por vezes, remover) esses zeros à esquerda para garantir consistência e conformidade. Este tutorial apresenta várias abordagens práticas para manter ou eliminar zeros à esquerda no Excel, adaptadas a diferentes cenários, destacando as vantagens e desvantagens de cada método.
- Definir formato de célula para manter zeros à esquerda
- Utilize a função TEXTO para adicionar zeros à esquerda
- Adicione zeros à esquerda automaticamente com VBA
- Adicione rapidamente zeros à esquerda utilizando Kutools para Excel
- Converter Texto para valor em Remover zeros à esquerda
- Remover zeros à esquerda com fórmula
- Eliminar zeros à esquerda automaticamente com VBA
- Remoção com um clique utilizando Kutools para Excel
Como manter ou adicionar zeros à esquerda no Excel
Se os seus dados exigirem a manutenção ou adição de zeros à esquerda—por exemplo, em códigos, identificadores ou listas formatadas—o Excel oferece vários métodos flexíveis para alcançar este objetivo. Pode preservar os zeros à esquerda através da formatação de células, fórmulas ou VBA, consoante os seus dados precisem de permanecer numéricos ou serem tratados como texto.
Nesta secção, exploramos diversas formas de manter ou adicionar zeros à esquerda no Excel, desde ferramentas incorporadas até à automatização avançada com
Definir formato de célula para Manter Zeros à Esquerda
Para preservar os zeros à esquerda no Excel — especialmente em códigos, identificadores ou outros elementos não numéricos — defina o formato da célula como Texto antes de introduzir quaisquer valores. Assim, evita que o Excel interprete a entrada como um número e remova automaticamente os zeros.
1. Selecione o intervalo de células onde pretende introduzir dados com zeros à esquerda. Clique com o botão direito do rato na seleção e escolha Definir formato de célula no menu de contexto. Isto abre as opções de formatação. Veja a captura de ecrã:
2. Na caixa de diálogo Definir formato de célula, aceda ao separador Número e selecione Texto na lista Categoria. Clique em OK para confirmar e fechar a caixa de diálogo. Veja a captura de ecrã:
Agora, pode digitar números com zeros à esquerda nestas células e o Excel irá exibi-los exatamente como foram introduzidos, sem eliminar quaisquer zeros. Veja a captura de ecrã:
Nota: Se definir o formato de célula como Texto após introduzir os números, o Excel não restaurará automaticamente os zeros à esquerda já eliminados. Introduza ou cole os seus dados após alterar para Formato de Texto para garantir o resultado pretendido.
Este método é ideal quando necessita garantir que todos os dados são intencionalmente digitados ou colados como texto, por exemplo, ao importar códigos ou identificadores de fontes externas.
Vantagens: É muito simples e não requer fórmulas; garante uma correspondência exata do texto.
Desvantagens: Não é adequado para conversão numérica em massa; deve ser configurado antes da introdução dos dados.
Utilizar a Função TEXTO para Adicionar Zeros à Esquerda
Em alguns casos, poderá ter dados numéricos e pretender exibi-los com um número fixo de dígitos, incluindo zeros à esquerda. A função TEXTO permite converter um valor em texto e aplicar uma formatação personalizada, como adicionar zeros à esquerda.
Por exemplo, se o valor na célula A1 for 32423, mas pretender que o resultado apresentado tenha sempre 8 dígitos: 00032423.
1. Introduza a seguinte fórmula noutra célula (por exemplo, B1):
=TEXT(A1,"00000000")2. Prima Enter para confirmar. A célula com a fórmula irá apresentar o valor original com o número especificado de zeros à esquerda adicionados.
Se precisar de aplicar esta fórmula a várias linhas, copie a célula da fórmula para baixo (arraste a alça de preenchimento ou utilize Ctrl+C/Ctrl+V) e ajuste as referências conforme necessário.
Explicação do parâmetro: O número de zeros em "00000000" representa o comprimento total pretendido para o número. Ajuste-o conforme as suas necessidades de formatação.
Dicas:Se necessitar de preenchimento com caracteres não numéricos (por exemplo, A001), ajuste a cadeia de formatação em conformidade (por exemplo,)"A000").
Vantagens: Aplicação fácil de formatação com comprimento fixo; a fórmula pode ser copiada para grandes intervalos.
Desvantagens: O resultado está em formato de texto, não sendo adequado para operações aritméticas subsequentes.
Adicione zeros à esquerda automaticamente com VBA
Se precisar de preencher valores existentes com zeros à esquerda de modo que cada entrada atinja um comprimento fixo (como em números de peça ou códigos consistentes), pode utilizar uma solução VBA para automatizar este processo. Este método é especialmente útil quando os dados estão formatados de forma inconsistente ou distribuídos por um grande intervalo.
1. Aceda a Ferramentas de Programador > Visual Basic ou prima Alt + F11 para abrir o editor VBA. Na janela, escolha Inserir > Módulo e cole o seguinte código:
Sub AddLeadingZeros()
'Updated by Extendoffice
Dim WorkRng As Range
Dim xCell As Range
Dim strLen As Integer
Dim strZeros As String
Dim fixedLen As Integer
Dim xTitleId As String
On Error Resume Next
xTitleId = "Kutools for Excel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range to pad with leading zeros", xTitleId, WorkRng.Address, Type:=8)
If WorkRng Is Nothing Then Exit Sub
fixedLen = Application.InputBox("How many digits should each entry be?", xTitleId, "", Type:=1)
If fixedLen < 1 Then Exit Sub
Application.ScreenUpdating = False
For Each xCell In WorkRng
If Not IsEmpty(xCell.Value) And IsNumeric(xCell.Value) Then
strLen = Len(xCell.Value)
If strLen < fixedLen Then
strZeros = String(fixedLen - strLen, "0")
xCell.NumberFormat = "@"
xCell.Value = strZeros & CStr(xCell.Value)
End If
End If
Next
Application.ScreenUpdating = True
MsgBox "Leading zeros added successfully!", vbInformation, xTitleId
End Sub2. Após introduzir o código, prima o botão 
. Ser-lhe-á apresentada uma caixa de diálogo para selecionar o intervalo de células de destino e especificar o comprimento fixo pretendido.
A macro adicionará automaticamente zeros à esquerda a cada célula, de modo que todas as entradas correspondam ao comprimento escolhido.
Precauções: Este script substitui os valores das células. Recomendamos que faça uma cópia de segurança da sua folha de cálculo antes de o executar em conjuntos de dados grandes ou sensíveis.
Vantagens: Processamento em massa rápido; suporta qualquer comprimento fixo que especifique.
Desvantagens: Requer permissões de macros e alguma experiência com VBA.
Adicionar rapidamente zeros à esquerda utilizando Kutools para Excel
Adicionar/Eliminar zeros à esquerda com Kutools para Excel
Para adicionar rapidamente o mesmo número de zeros à esquerda a várias células (por exemplo, para formatar códigos ou identificadores), o Kutools para Excel oferece a ferramenta Adicionar Texto. Esta funcionalidade inclui pré-visualização em tempo real e processamento em lote, garantindo precisão na edição de dados formatados.（Transferência gratuita do Kutools para Excel já!)
1. Em primeiro lugar, formate as células de destino como Texto. Selecione-as, clique em Base, aceda ao grupo Numérico e escolha Texto na lista suspensa.
2. Com as células ainda selecionadas, clique em Kutools > Texto > Adicionar Texto.
3. Na caixa de diálogo Adicionar Texto, introduza o número de zeros a adicionar e selecione Antes do primeiro caractere. Veja uma pré-visualização do resultado no painel direito.
4. Clique em OK ou em Aplicar para adicionar zeros à esquerda a todas as células selecionadas.
Isto é útil para formatação em lote de identificadores e números de catálogo.
Eliminar zeros à esquerda
Em alguns casos, o seu conjunto de dados pode conter zeros à esquerda indesejados — frequentemente resultantes de ficheiros de texto importados, exportações de sistemas ou introdução inconsistente de dados. Por exemplo, valores como 00045 ou 00789 devem aparecer como 45 ou 789 para efeitos de cálculo ou análise.
Felizmente, o Excel oferece várias formas rápidas de remover esses zeros desnecessários. Quer prefira utilizar ferramentas incorporadas, fórmulas, código VBA ou o Kutools para Excel, poderá limpar facilmente os seus dados e converter cadeias de texto em valores numéricos adequados.
Converter Texto para valor em Remover zeros à esquerda
Quando os valores numéricos são armazenados como texto, o Excel apresenta um ícone de aviso junto a essas células. Para converter instantaneamente e remover os zeros à esquerda, selecione o intervalo, clique no ícone de aviso e escolha Converter em Número no menu. Veja a captura de ecrã:
Em seguida, os números armazenados como texto são convertidos em valores numéricos, eliminando ao mesmo tempo os zeros à esquerda.
Remover zeros à esquerda com fórmula
Para converter números armazenados como texto com zeros à esquerda de volta em valores numéricos, selecione uma célula vazia adjacente à sua lista (por exemplo, B1) e introduza:
=VALUE(A1)Após premir Enter, a célula da fórmula mostrará automaticamente o número original sem os zeros à esquerda. Arraste para baixo para aplicar a fórmula a outras células, conforme necessário.
Esta abordagem é muito prática quando pretende normalizar rapidamente dados de texto importados ou converter cadeias numéricas para cálculos.
Vantagens: Rápida e fácil; ideal para conversão em massa.
Desvantagens: Os resultados tornam-se números reais; não é adequado se precisar de preservar códigos em formato de texto.
Se souber exatamente quantos zeros ou caracteres à esquerda pretende remover, pode utilizar a função DIREITA para extrair os dígitos pretendidos de uma cadeia de texto. Esta abordagem é ideal quando os dados seguem um formato fixo ou quando deseja manter apenas um número específico de caracteres a partir do final.
1. Suponha que a célula A1 contém "00032423" e que pretende manter apenas os últimos 5 dígitos. Introduza esta fórmula numa célula vazia (por exemplo, B1):
=RIGHT(A1,5)Após premir Enter, a fórmula apresentará "32423". Ajuste o argumento numérico para especificar quantos caracteres finais pretende manter. Se souber que há sempre 3 zeros à esquerda a remover, também pode utilizar:
=RIGHT(A1,LEN(A1)-3)Esta fórmula remove os primeiros 3 caracteres, independentemente do seu valor. Copie a fórmula para baixo, se necessário, para mais células.
Lembretes de erro: Se diferentes linhas tiverem números variáveis de zeros à esquerda, esta abordagem poderá necessitar de ajustes. Para dados inconsistentes, considere combiná-la com a função VAL ou lógica mais avançada.
Vantagens: Flexibilidade para remoção em formato fixo e manipulação de códigos não numéricos.
Desvantagens: Requer ajuste manual para dados de comprimento variável.
Eliminar zeros à esquerda automaticamente com VBA
Para utilizadores avançados, o VBA oferece flexibilidade adicional para remoção personalizada em lote. Para utilizar VBA:
1. Prima Alt + F11 para abrir a janela do Microsoft Visual Basic for Applications.
2. Na janela do VBA, clique em Inserir > Módulo e, de seguida, copie e cole o código fornecido:
VBA: Eliminar zeros à esquerda no Excel
Sub DeleteZero()
'updateby20140616
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
WorkRng.NumberFormat = "General"
WorkRng.Value = WorkRng.Value
End Sub
3. Clique no botão Executar. Aparecerá uma caixa de diálogo do Kutools for Excel para selecionar o intervalo de células-alvo a partir do qual pretende remover os zeros. Veja a captura de ecrã:
4. Clique em OK e os zeros à esquerda na sua seleção serão eliminados instantaneamente.
Esta solução é útil para automatizar tarefas repetitivas, personalizar lógica ou aplicar regras seletivamente a grandes conjuntos de dados.
Vantagens: Altamente personalizável e eficiente para necessidades complexas.
Desvantagens: Requer conhecimentos básicos de VBA e permissão para executar macros.
Remoção com um clique utilizando Kutools para Excel
Com o Kutools para Excelinstalado, pode eliminar instantaneamente todos os zeros à esquerda de várias células com apenas alguns cliques, utilizando a sua utilidade Remover zeros à esquerda.（Transferência gratuita do Kutools para Excel já!)
Basta selecionar as células onde pretende remover os zeros e, em seguida, clicar em Kutools > Texto > Remover zeros à esquerda. Veja a captura de ecrã:
Uma caixa de diálogo confirmará quantas células foram alteradas.
Clique em OK para concluir e fechar a caixa de diálogo.
Este método é ideal para remover zeros à esquerda de grandes intervalos sem complicações com fórmulas — não requer qualquer configuração adicional.
Independentemente do método utilizado, preste atenção ao tratamento do tipo de dados: a conversão entre números e texto pode comprometer fórmulas ou cálculos posteriores. Em caso de dúvida, faça sempre uma cópia de segurança dos seus dados antes de aplicar operações em massa de formatação — seja por fórmula, VBA ou utilitários do Kutools.
Se obtiver resultados inesperados, verifique se existem formatos de célula mistos ou tipos de entrada inconsistentes. Em soluções com fórmulas, confirme que as suas referências utilizam os endereços de célula corretos e que as células de resultado estão formatadas para apresentar os dados exatamente como pretendido.
Para tarefas adicionais que exijam formatação personalizada avançada ou edições repetitivas em lote, combine as ferramentas VBA e Kutools para fluxos de trabalho ainda mais eficientes.
Artigos Relacionados:
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