Como numerar linhas após inserir ou excluir linhas automaticamente no Excel?
Supondo que eu tenha numerado as linhas de 1 a 20 em uma coluna, agora, ao inserir ou excluir uma linha do intervalo de dados, quero que a lista de números possa ser renumerada automaticamente. Esta tarefa pode ser concluída no Excel?
Numere as linhas após inserir ou excluir linhas automaticamente com fórmulas
Numere linhas após inserir ou excluir linhas automaticamente com o código VBA
Numere as linhas após inserir ou excluir linhas automaticamente com fórmulas
Na verdade, a função de linha no Excel pode ajudá-lo a renumerar automaticamente as linhas após inserir ou excluir linhas, faça o seguinte:
1. Insira esta fórmula: = ROW () - 1 na célula A2 e, em seguida, arraste a alça de preenchimento até as células nas quais deseja numerar as linhas, veja a captura de tela:
Note: Se a sua lista de números começar na primeira célula, você pode alterar a fórmula como = ROW (), você pode adicionar ou subtrair da fórmula se seus números não corresponderem à linha real, por exemplo, = ROW () - 3, = ROW () + 10...
2. Em seguida, crie uma tabela para este intervalo de dados, selecione o intervalo de dados e clique em inserção > mesa, e então no Criar a tabela caixa de diálogo, verifique Minha tabela tem cabeçalhos se houver cabeçalhos em seu intervalo, consulte a captura de tela:
3. E, em seguida, clique em OK, a tabela foi criada de uma vez, e agora, quando você insere ou exclui linhas no intervalo da tabela, os números das linhas são sempre atualizados automaticamente, consulte a captura de tela:
Numere linhas após inserir ou excluir linhas automaticamente com o código VBA
Exceto o método de fórmula acima, você também pode finalizá-lo com um código VBA.
1. Vá para a planilha em que deseja inserir números de sequência automaticamente.
2. Clique com o botão direito na guia da planilha e selecione Ver código a partir do menu de contexto, no pop-out Microsoft Visual Basic para Aplicações janela, copie e cole o código a seguir na janela do módulo em branco.
Código VBA: numerar automaticamente as linhas após inserir ou excluir linhas:
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160612
Dim I As Integer
I = 1
Application.EnableEvents = False
For I = 1 To 20
Range("A" & I).Value = I
Next
Range("A21").Value = ""
Application.EnableEvents = True
End Sub
3. Em seguida, salve e feche este código, ao inserir o primeiro número 1 na célula A1, os números de sequência de 1 a 20 serão preenchidos automaticamente. Se você inserir ou excluir linhas do intervalo, o número de série será renumerado automaticamente.
Note: No código acima, a letra A indica a letra da coluna que você deseja preencher com o número de sequência, 1 Para 20 são as linhas que você deseja numerar, e A21 é a referência de célula ao lado de sua última célula numerada. Você pode alterá-los conforme necessário.
Insira marcadores ou lista de numeração em uma coluna de células
Kutools for Excel's Inserir marcador e euNumeração nsert recursos podem ajudá-lo a inserir rapidamente uma lista com marcadores e numeração em uma coluna de células. Clique para baixar o Kutools para Excel!
Kutools for Excel: com mais de 300 suplementos úteis do Excel, grátis para testar sem limitação em 30 dias. Baixe e teste grátis agora!
Demonstração: Numere as linhas após inserir ou excluir linhas automaticamente na planilha do Excel
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!
