Ir para o conteúdo principal

Como preencher os números de sequência, pular as linhas ocultas no Excel?

Supondo que você tenha um intervalo de dados de filtro que deseja preencher com os números de sequência na célula em branco filtrada, como mostrado a seguir na captura de tela. Neste caso, arrastar a alça de preenchimento não preencherá as células corretamente, geralmente, neste artigo, irei falar sobre alguns bons truques para resolver essa tarefa no Excel.

doc preencher pular oculto 1 2 doc preencher pular oculto 2

Preencha os números de sequência, pule as linhas ocultas com a fórmula

Preencha os números de sequência, pule as linhas ocultas com o código VBA

Preencha os números de sequência, pule as linhas ocultas com o Kutools para Excel


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

1. Insira esta fórmula: = SUBTOTAL (103, $ B $ 3: $ B3)(B3 é a célula visível que corresponde à célula para a qual você deseja começar a preencher o número de sequência) na primeira célula onde deseja preencher os números de sequência, A3, para esta instância, e então pressione Entrar chave, você obterá um número 1, veja a captura de tela:

doc preencher pular oculto 3

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

doc preencher pular oculto 4


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

1. Segure o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

2. Clique inserção > Móduloe cole o seguinte código no Módulo Janela.

Código VBA: preencha os números de sequência, pule as 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. Então aperte F5 para executar este código e uma caixa de prompt é exibida para lembrá-lo de selecionar o intervalo de dados que deseja preencher, consulte a captura de tela:

doc preencher pular oculto 5

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


Os dois métodos acima só podem ajudá-lo a preencher os números da sequência nas células visíveis, se você quiser preencher a sequência como AA-0001-BB, AA-0002-BB, AA-0003-BB ..., os métodos acima não funcionarão. Mas, por favor, não se preocupe, Kutools for Excel'S Inserir número de sequência utilitário pode ajudá-lo a terminá-lo de forma rápida e fácil.

Kutools for Excel : com mais de 300 suplementos úteis do Excel, grátis para testar sem limitação em 30 dias

Depois de instalar Kutools for Excel, faça o seguinte:

1. Selecione as células que você deseja preencher as sequências.

2. Clique Kutools > inserção > Inserir número de sequência, Na Inserir número de sequência caixa de diálogo, clique em Novo botão, veja as capturas de tela:

2 doc preencher pular oculto 7

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:

doc preencher pular oculto 8

4. Depois de terminar as configurações, clique Adicionar botão para salvar este novo item na caixa de lista acima, veja a captura de tela:

doc preencher pular oculto 9

6. E então selecione o item que você criou e clique Faixa de preenchimento botão, as strings de sequência foram preenchidas apenas nas células visíveis, consulte a captura de tela:

doc preencher pular oculto 10

Baixe e teste grátis Kutools para Excel agora!


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!

Melhores ferramentas de produtividade de escritório

🤖 Assistente de IA do Kutools: Revolucionar a análise de dados com base em: Execução Inteligente   |  Gerar Código  |  Crie fórmulas personalizadas  |  Analise dados e gere gráficos  |  Invocar funções do Kutools...
Recursos mais comuns: Encontre, destaque ou identifique duplicatas   |  Excluir linhas em branco   |  Combine colunas ou células sem perder dados   |   Rodada sem Fórmula ...
Super pesquisa: VLookup de múltiplos critérios    VLookup de múltiplos valores  |   VLookup em várias planilhas   |   Pesquisa Difusa ....
Lista suspensa avançada: Crie rapidamente uma lista suspensa   |  Lista suspensa de dependentes   |  Lista suspensa de seleção múltipla ....
Gerenciador de colunas: Adicione um número específico de colunas  |  Mover colunas  |  Alternar status de visibilidade de colunas ocultas  |  Compare intervalos e colunas ...
Recursos em destaque: Foco da Grade   |  Vista de Design   |   Grande Barra de Fórmula    Gerenciador de pastas de trabalho e planilhas   |  Biblioteca (Auto texto)   |  Data Picker   |  Combinar planilhas   |  Criptografar/Descriptografar Células    Enviar e-mails por lista   |  Super Filtro   |   Filtro Especial (filtro negrito/itálico/tachado...) ...
15 principais conjuntos de ferramentas12 Texto Ferramentas (Adicionar texto, Remover Personagens, ...)   |   50+ de cores Tipos (Gráfico de Gantt, ...)   |   Mais de 40 práticos Fórmulas (Calcule a idade com base no aniversário, ...)   |   19 Inclusão Ferramentas (Insira o código QR, Inserir imagem do caminho, ...)   |   12 Conversão Ferramentas (Números para Palavras, Conversão de moedas, ...)   |   7 Unir e dividir Ferramentas (Combinar linhas avançadas, Dividir células, ...)   |   ... e mais

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...

Descrição


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!
Comments (12)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
What's the magic with the 103?
This comment was minimized by the moderator on the site
It worked!! Thank you so muh!
This comment was minimized by the moderator on the site
none of these BS worked...The first one using formula, had skipped numbers and repeating other numbers... is there an easier way? FFS!
This comment was minimized by the moderator on the site
I have different worksheets in a workbook and I want to use VBA code for all worksheet at once .
Can anybody help me out.


For Example:
In every sheet in A1 I have S.No. and I want it to be a Sequence number 1 2 3 4 .....
This comment was minimized by the moderator on the site
VERY THANKS
This comment was minimized by the moderator on the site
I have been manually adding serial numbers to sheets containing hundreds, if not thousands, of rows since the past few years. The above formula has literally save a whole lot of hours for me, for the rest of my life. Thank you, Op.
This comment was minimized by the moderator on the site
This is not working. Instead of filling series, it's just copying first cell.
This comment was minimized by the moderator on the site
It doesn't work for me either! I get 1 in the original cell and then 1 in every cell I copy the formula to.
This comment was minimized by the moderator on the site
All of these steps above are way too complicated when I just want to double click the Fill Handle and Fill Down over hidden rows. Could Kutools give us a way to AutoFill using the Fill handle over filtered/hidden rows just using double click?
This comment was minimized by the moderator on the site
Hello, Matt,
Thank you for your comment, Kutools does not support this feature so far, but, we will consider your suggestion.
Thank you!
This comment was minimized by the moderator on the site
How can we use this solution with a custom starting number: Fill Down Sequence Numbers Skip Hidden Rows With VBA Code
This comment was minimized by the moderator on the site
Thank you! This works!!! Really appreciate it! Take Care and God Bless, PB
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations