Skip to main content

Como numerar automaticamente ou renumerar após filtrar no Excel?

Author: Xiaoyang Last Modified: 2025-06-04

Como todos sabemos, ao filtrar os dados que possuem uma lista de números de série, os números das linhas na planilha serão exibidos da mesma forma que os números originais; eles não são renumerados automaticamente. No entanto, às vezes, você pode querer renumerar as linhas em sequência na planilha filtrada, conforme mostrado nas capturas de tela a seguir. Neste artigo, vou explicar como numerar automaticamente ou renumerar após filtrar no Excel.

Numerar automaticamente ou renumerar após o filtro com código VBA

Numerar automaticamente ou renumerar após o filtro com Kutools para Excel

originla numbers arrow right renumber after filtering

Numerar automaticamente ou renumerar após o filtro com código VBA

No estado filtrado, você não pode usar a alça de preenchimento automático para preencher a sequência numérica, sendo necessário digitar os números um por um. No entanto, isso será tedioso e demorado se houver muitas células que precisam ser renumeradas. Aqui, apresentarei um código VBA para resolver essa tarefa.

1. Mantenha pressionadas as teclas ALT + F11, e abrirá a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole a seguinte macro na janela Módulo.

Código VBA: Numerar automaticamente ou renumerar após o filtro

Sub Renumbering()
	'Updateby Extendoffice
	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)
	Set WorkRng = WorkRng.Columns(1).SpecialCells(xlCellTypeVisible)
	xIndex = 1
	For Each Rng In WorkRng
		Rng.Value = xIndex
		xIndex = xIndex + 1
	Next
End Sub

3. Após colar o código, pressione a tecla F5 para executar este código, e uma caixa de aviso aparecerá para lembrá-lo de selecionar um intervalo de células que deseja numerar automaticamente ou renumerar as linhas, veja a captura de tela:

vba code to select the cells

4. Em seguida, clique em OK, e suas células do intervalo selecionado terão sido renumeradas sequencialmente, conforme mostrado na captura de tela abaixo:

the selected cells are renumbered sequentially

Observação: Este código destruirá os números de linha da série original quando você cancelar a função de filtro. Portanto, faça backup dos seus dados primeiro.


Numerar automaticamente ou renumerar após o filtro com Kutools para Excel

Se você instalou Kutools para Excel, com seu poderoso recurso Inserir Número de Sequência, você pode inserir números de sequência nos dados filtrados rapidamente e facilmente.

Kutools para Excel oferece mais de 300 recursos avançados para simplificar tarefas complexas, aumentando a criatividade e a eficiência. Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados fácil e eficiente. Mais informações sobre o Kutools para Excel...  Teste gratuito...

Após instalar Kutools para Excel, proceda da seguinte maneira:

1. Selecione as células que deseja renumerar para os dados filtrados.

2. Em seguida, clique em Kutools > Inserir > Inserir Número de Sequência, veja a captura de tela:

 click Insert Sequence number feature of kutools

3. Na caixa de diálogo Inserir Número de Sequência que apareceu, clique no botão Novo, veja a captura de tela:

click New button in the dialog box

4. E então crie a lista de números de sequência conforme necessário na seção inferior esquerda, veja a captura de tela:

create the sequence list numbers in the dialog box

5. Após configurar a sequência, clique no botão Adicionar, e o item de sequência terá sido adicionado à caixa de diálogo, veja a captura de tela:

the sequence item is added into the dialog box,

6. E então clique em Preencher Intervalo, e os dados filtrados terão sido renumerados imediatamente. Veja a captura de tela:

click Fill Range to renumber the cells

Baixe e experimente gratuitamente Kutools para Excel agora!


Demonstração: Numerar automaticamente ou renumerar após o filtro com Kutools para Excel

 

Artigo relacionado:

Como numerar automaticamente células mescladas no Excel?

Melhores Ferramentas de Produtividade para Office

🤖 Assistente AI do KUTOOLS: Revolucione a análise de dados com base em: Execução Inteligente | Gerar Código | Criar Fórmulas Personalizadas | Analisar Dados e Gerar Gráficos | Invocar Funções Aprimoradas
Recursos Populares: Encontrar, Destacar ou Marcar Duplicatas | Excluir Linhas em Branco | Combinar Colunas ou Endereço sem Perder Dados | Arredondar...
Super PROC: PROC com Múltiplos Critérios | PROC com Múltiplos Valores | Procura em várias planilhas | Correspondência Fuzzy...
Lista Suspensa Avançada: Crie rapidamente uma Lista Suspensa | Lista Suspensa Dependente | Lista Suspensa com Múltipla Seleção...
Gerenciador de Colunas: Adicionar um Número Específico de Colunas | Mover Colunas | Alternar Estado de Visibilidade das Colunas Ocultas | Comparar Intervalo & Colunas...
Recursos em Destaque: Grade de foco | Visualização de Design | Barra de fórmulas aprimorada | Gerenciador de Pasta de trabalho & Planilha | Biblioteca de AutoTexto | Selecionador de Data | Mesclar Dados | Criptografar/Descriptografar Células | Enviar Email por Lista | Super Filtro | Filtro Especial (filtrar negrito/itálico/tachado...)...
Top15 Conjuntos de Ferramentas:12 Ferramentas de Texto (Adicionar Texto, Excluir Caracteres Específicos, ...) | Mais de50 Tipos de Gráficos (Gráfico de Gantt, ...) | Mais de40 Fórmulas Práticas (Calcular a idade com base na data de nascimento, ...) |19 Ferramentas de Inserção (Inserir Código QR, Inserir Imagem a partir do Caminho, ...) |12 Ferramentas de Conversão (Converter em Palavras, Conversão de Moeda, ...) |7 Ferramentas de Mesclar & Dividir (Mesclar Linhas Avançado, Dividir Células, ...) | ... e muito mais

Potencialize suas habilidades no Excel com o Kutools para Excel e experimente uma eficiência sem igual. O 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...


O Office Tab traz interface com abas para o Office e facilita muito o 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 na mesma janela, em vez de abrir novas janelas.
  • Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!