Como preencher números de sequência pulando linhas ocultas no Excel?

Suponha que você tenha um intervalo de dados filtrados no qual deseja preencher números de sequência nas células filtradas em branco, conforme mostrado na captura de tela a seguir. Nesse caso, arrastar a alça de preenchimento geralmente não preencherá as células corretamente. Neste artigo, vou falar sobre alguns truques úteis para resolver essa tarefa no Excel.

Preencher números de sequência pulando linhas ocultas com fórmula

Preencher números de sequência pulando linhas ocultas com código VBA

Preencher números de sequência pulando linhas ocultas com Kutools para Excel

Preencher números de sequência pulando linhas ocultas com fórmula

Para preencher números de sequência apenas nas células visíveis, uma fórmula simples pode ajudá-lo; por favor, faça o seguinte:

1. Insira esta fórmula: =SUBTOTAL(103,$B$3:$B3) (B3 é a célula visível correspondente à célula onde você deseja começar a preencher o número de sequência) na primeira célula onde você deseja preencher os números de sequência, A3, neste exemplo, e depois pressione a tecla Enter, você obterá o número 1, veja a captura de tela:

2. Em seguida, selecione a célula A3 e arraste a alça de preenchimento para baixo até as células que você deseja preencher com os números de sequência, veja a captura de tela:

Preencher números de sequência pulando linhas ocultas com código VBA

O seguinte código VBA também pode ajudá-lo a preencher os números de sequência apenas nas células visíveis; por favor, faça o seguinte:

1. Pressione e segure as teclas ALT + F11 para abrir a janela do Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole o seguinte código na Janela do Módulo.

Código VBA: Preencher números de sequência pulando linhas ocultas:

Sub FillValue()
'updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xTxt As String
    Dim xVal As Long
    Dim I As Long
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the data range", "Kutools for Excel", xTxt, , , , , 8)
    Set xRg = xRg.SpecialCells(xlVisible)
    Debug.Print xRg.Address
    If xRg Is Nothing Then Exit Sub
    For Each xCell In xRg
        xVal = xVal + 1
        xCell = xVal
    Next
End Sub

3. Em seguida, pressione a tecla F5 para executar este código, e uma caixa de prompt será exibida para lembrá-lo de selecionar o intervalo de dados que você deseja preencher, veja a captura de tela:

4. E então clique no botão OK, os números de sequência serão preenchidos apenas nas células visíveis.

Preencher números de sequência pulando linhas ocultas com Kutools para Excel

Os dois métodos acima só podem ajudá-lo a preencher os números de sequência nas células visíveis. Se você quiser preencher sequências como AA-0001-BB, AA-0002-BB, AA-0003-BB…, os métodos acima não funcionarão. Mas não se preocupe, a utilidade Inserir Número de Sequência do Kutools para Excel pode ajudá-lo a concluir isso rapidamente e facilmente.

Após instalar o Kutools para Excel, por favor, faça o seguinte:

1. Selecione as células nas quais você deseja preencher sequências de strings.

2. Clique em Kutools > Inserir > Inserir Número de Sequência, na caixa de diálogo Inserir Número de Sequência, clique no botão Novo, veja as capturas de tela:

3. Na caixa de diálogo expandida, especifique as configurações conforme necessário na seção inferior esquerda. Ao mesmo tempo, você pode visualizar a sequência no painel inferior direito, veja a captura de tela:

4. Após finalizar as configurações, clique no botão Adicionar para salvar este novo item na caixa de listagem acima, veja a captura de tela:

6. E então selecione o item que você criou e clique no botão Preencher Intervalo, as sequências de strings serão preenchidas apenas nas células visíveis, veja a captura de tela:

Baixe e experimente gratuitamente o Kutools para Excel agora!

Demonstração: Preencher números de sequência pulando linhas ocultas com Kutools para Excel