Inserir uma linha em branco após cada linha no Excel (ou a cada enésima linha)

Assistir ao vídeo - Inserir linha em branco após cada linha no Excel

Pessoas que trabalham com grandes conjuntos de dados geralmente precisam de coisas simples, como inserir / excluir linhas ou colunas.

Embora já existam muitas maneiras diferentes (e simples) de adicionar linhas no Excel, quando se trata de inserir uma linha em branco após cada linha (ou a cada terceira ou quarta linha), as coisas ficam um pouco complicadas.

Insira uma linha em branco após cada outra linha

Neste tutorial, mostrarei algumas maneiras realmente simples de inserir uma linha em branco após cada linha no conjunto de dados existente (ou a cada enésima linha).

Como não há uma maneira direta de adicionar linhas entre as linhas, o método abordado neste artigo são soluções alternativas para que isso aconteça. E se você estiver familiarizado com o VBA, poderá fazer isso com um único clique.

Usando a coluna auxiliar e o recurso de classificação

Suponha que você tenha um conjunto de dados conforme mostrado abaixo e deseja inserir um espaço em branco entre as linhas existentes.

Abaixo estão as etapas para inserir linhas em branco entre as linhas existentes:

  1. Insira uma coluna em branco à esquerda do conjunto de dados. Para fazer isso, clique com o botão direito no cabeçalho da coluna da extrema esquerda e clique em Inserir.
  2. Digite o texto ‘HelperColumn’ em A1 (você pode usar qualquer texto que desejar)
  3. Insira 1 na célula A2 e 2 na célula A3.
  4. Selecione ambas as células e coloque o cursor na parte inferior direita da seleção. Quando o cursor mudar para um ícone de mais, clique duas vezes nele. Isso irá preencher toda a coluna com números crescentes
  5. Vá para a última célula preenchida na coluna auxiliar e selecione a célula abaixo dela.
  6. Insira 1 nesta célula e 2 na célula abaixo dela
  7. Selecione ambas as células e coloque o cursor na parte inferior direita da seleção.
  8. Quando o cursor mudar para um ícone de mais, clique e arraste-o para baixo. Isso preencherá uma série de números (exatamente como obtivemos na etapa 3). Certifique-se de obter mais números do que o que você tem no conjunto de dados. Por exemplo, se houver 10 registros no conjunto de dados, certifique-se de preencher pelo menos 10 células nesta etapa. Feito isso, seu conjunto de dados ficaria como mostrado abaixo.
  9. Selecione o conjunto de dados inteiro (incluindo todas as células na coluna auxiliar).
  10. Clique na guia Dados
  11. Clique na opção Classificar
  12. Na caixa de diálogo Classificar, use as seguintes configurações:
    • Classificar por: Helper
    • Classificar em: valor da célula
    • Pedido: do menor para o maior
  13. Clique OK. Isso fornecerá o conjunto de dados conforme mostrado abaixo.
  14. Exclua a coluna auxiliar.

Você notaria que, assim que clicar em OK na caixa de diálogo Classificar, as linhas serão reorganizadas instantaneamente e agora você terá uma linha em branco após cada linha do conjunto de dados.

Na realidade, isso não é realmente inserir uma linha em branco. Este método de classificação é simplesmente reorganizar os dados, colocando linhas em branco abaixo do conjunto de dados entre as linhas no conjunto de dados.

Você também pode estender a mesma lógica para insira uma linha em branco a cada duas linhas ou a cada três linhas.

Suponha que você tenha o conjunto de dados conforme mostrado abaixo e deseja obter uma linha em branco a cada duas linhas.

Abaixo estão as etapas para fazer isso:

  1. Insira uma coluna em branco à esquerda do conjunto de dados. Para fazer isso, clique com o botão direito no cabeçalho da coluna da extrema esquerda e clique em Inserir.
  2. Digite o texto ‘HelperColumn’ em A1 (você pode usar qualquer texto que desejar)
  3. Insira 1 na célula A2 e 2 na célula A3.
  4. Selecione ambas as células e coloque o cursor na parte inferior direita da seleção. Quando o cursor mudar para um ícone de mais, clique duas vezes nele. Isso irá preencher toda a coluna com números crescentes
  5. Vá para a última célula preenchida na coluna auxiliar e selecione a célula abaixo dela.
  6. Digite 2 nesta célula e 4 na célula abaixo dela. Estamos usando números em múltiplos de 2, pois queremos uma linha em branco a cada duas linhas.
  7. Selecione ambas as células e coloque o cursor na parte inferior direita da seleção.
  8. Quando o cursor mudar para um ícone de mais, clique e arraste-o para baixo. Isso preencherá uma série de números (exatamente como obtivemos na etapa 3). Certifique-se de obter um número maior do que o que você tem no conjunto de dados. Por exemplo, se houver 10 registros no conjunto de dados, certifique-se de obter pelo menos até o número 10.
  9. Selecione o conjunto de dados inteiro (incluindo todas as células na coluna auxiliar).
  10. Clique na guia Dados
  11. Clique na opção Classificar
  12. Na caixa de diálogo Classificar, use as seguintes configurações:
    • Classificar por: Helper
    • Classificar em: valor da célula
    • Pedido: do menor para o maior
  13. Clique OK. Isso lhe dará o conjunto de dados final, conforme mostrado abaixo (com uma linha em branco após cada segunda linha do conjunto de dados)
  14. Exclua a coluna auxiliar.

Da mesma forma, caso você queira inserir uma linha em branco após cada terceira linha, use o número 3, 6, 9 e assim por diante na Etapa 5.

Usando um código VBA simples

Embora você precise de muitas soluções alternativas para inserir linhas em branco alternativas no Excel, com o VBA é tudo moleza.

Com um código VBA simples, tudo o que você precisa fazer é selecionar o conjunto de dados no qual deseja inserir uma linha em branco após cada linha e simplesmente executar o código (com um único clique).

Abaixo está o código VBA que irá inserir uma linha em branco após cada linha no conjunto de dados:

Sub InsertAlternateRows () 'Este código irá inserir uma linha após cada linha na seleção' Este código foi criado por Sumit Bansal de trumpexcel.com Dim rng As Range Dim CountRow As Integer Dim i As Integer Set rng = Seleção CountRow = rng. WholeRow.Count For i = 1 To CountRow ActiveCell.Offset (1, 0) .EntireRow.Insert ActiveCell.Offset (2, 0) .Select Next i End Sub

O código acima conta o número total de linhas na seleção e usa um loop For Next para percorrer cada linha e inserir uma linha em branco após cada linha existente no conjunto de dados.

Aqui estão as etapas para colocar este código VBA no Editor VB do Excel:

  1. Copie o código acima
  2. Vá para a guia Desenvolvedor e clique na opção Visual Basic. Isso abrirá o Editor VB. Você também pode usar o atalho do teclado ALT + F11
  3. No Editor VB, clique com o botão direito em qualquer objeto no Explorador de Projetos
  4. Passe o cursor sobre a opção Inserir e clique em Módulo. Isso irá inserir um novo módulo
  5. Na janela de código do módulo, cole o código acima.

Depois de ter o código no Editor VB, agora você pode usar esse código para inserir linhas em branco após cada linha no conjunto de dados.

Aqui estão as etapas para usar o código para inserir linhas em branco após cada linha:

  1. Selecione todo o conjunto de dados (exceto a linha de cabeçalho)
  2. Clique na guia Desenvolvedor (caso você não tenha a guia Desenvolvedor, clique aqui para saber como obtê-la)
  3. Clique na opção ‘Macros’
  4. Na caixa de diálogo Macro, selecione a macro - ‘InsertAlternateRows’
  5. Clique em Executar

É isso!

As etapas acima inserem instantaneamente linhas em branco alternadas no conjunto de dados.

Existem muitas maneiras diferentes de executar uma macro no Excel. Por exemplo, se você tiver que fazer isso com frequência, poderá adicionar essa macro à Barra de Ferramentas de Acesso Rápido para que possa executá-la com um único clique.

Você pode ler mais sobre as diferentes maneiras de executar macros aqui.

Caso queira inserir uma linha em branco após cada segunda linha, você pode usar o código abaixo:

Sub InsertBlankRowAfterEvery2ndRow () 'Este código irá inserir uma linha após cada segunda linha na seleção' Este código foi criado por Sumit Bansal de trumpexcel.com Dim rng As Range Dim CountRow As Integer Dim i As Integer Set rng = Seleção CountRow = rng .EntireRow.Count For i = 1 To CountRow / 2 ActiveCell.Offset (2, 0) .EntireRow.Insert ActiveCell.Offset (3, 0) .Select Next i End Sub

Espero que você tenha achado este tutorial útil.

Você vai ajudar o desenvolvimento do site, compartilhando a página com seus amigos

wave wave wave wave wave