Como inserir um número específico de linhas em intervalos fixos no Excel?
Em uma planilha do Excel, você pode inserir manualmente linhas em branco entre linhas existentes usando a função Incorporar nativa. No entanto, ao lidar com um grande conjunto de dados ou quando é necessário inserir regularmente, por exemplo, duas linhas em branco após cada terceira ou enésima linha, realizar essa tarefa manualmente se torna demorado e ineficiente. Automatizar a inserção de linhas em branco em intervalos fixos não apenas economiza tempo, mas também minimiza erros, tornando seu fluxo de trabalho mais eficiente. Os métodos a seguir mostrarão como realizar essa tarefa de forma rápida e conveniente, incluindo soluções para inserir linhas em branco com base em determinados critérios ou repetição de linhas, tanto com quanto sem VBA.
➤ Insira um número específico de linhas em branco no intervalo de dados em intervalos fixos com código VBA
➤ Insira um número específico de linhas em branco no intervalo de dados com base nos valores das células com código VBA
➤ Insira um número específico de linhas em branco no intervalo de dados em intervalos fixos com um recurso prático
➤ Insira um número específico de linhas em branco em intervalos fixos com fórmulas do Excel
➤ Copie e insira linhas várias vezes com base em números específicos com código VBA
➤ Copie e insira linhas várias vezes com base em números específicos com um recurso incrível
Insira um número específico de linhas em branco no intervalo de dados em intervalos fixos com código VBA
O seguinte código VBA pode ajudá-lo a inserir automaticamente um número específico de linhas em branco após cada enésima linha dentro do seu intervalo de dados existente. Essa abordagem é adequada para usuários confortáveis com macros e que precisam manipular conjuntos de dados médios a grandes de forma eficiente. Por favor, execute as seguintes etapas para esta solução:
1. Pressione e segure as teclas ALT + F11 no Excel, o que abre a janela 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: Insira um número específico de linhas no intervalo de dados em intervalos fixos
Sub InsertRowsAtIntervals()
'Updateby Extendoffice
Dim Rng As Range
Dim xInterval As Integer
Dim xRows As Integer
Dim xRowsCount As Integer
Dim xNum1 As Integer
Dim xNum2 As Integer
Dim WorkRng As Range
Dim xWs As Worksheet
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xRowsCount = WorkRng.Rows.Count
xInterval = Application.InputBox("Enter row interval. ", xTitleId, 1, Type:=1)
xRows = Application.InputBox("How many rows to insert at each interval? ", xTitleId, 1, Type:=1)
xNum1 = WorkRng.Row + xInterval
xNum2 = xRows + xInterval
Set xWs = WorkRng.Parent
For i = 1 To Int(xRowsCount / xInterval)
xWs.Range(xWs.Cells(xNum1, WorkRng.Column), xWs.Cells(xNum1 + xRows - 1, WorkRng.Column)).Select
Application.Selection.EntireRow.Insert
xNum1 = xNum1 + xNum2
Next
End Sub
3. Após colar este código, pressione F5 para executá-lo. Uma caixa de diálogo aparecerá, lembrando você de selecionar o intervalo de dados onde deseja inserir linhas em branco, conforme mostrado abaixo:
4. Clique em OK. Outra caixa de diálogo aparece, onde você deve inserir o intervalo de linha desejado — por exemplo, inserir 3 irá adicionar linhas em branco após cada terceira linha:
5. Continue clicando em OK, depois insira o número de linhas em branco que deseja inserir sempre que o código solicitar (por exemplo, inserir 2 para adicionar duas linhas):
6. Após confirmar suas escolhas, as linhas em branco serão inseridas em seus dados nos intervalos definidos. Veja a comparação antes e depois abaixo:
 |  |  |
Dicas & Notas:
- Esta macro permite que você selecione flexivelmente seu intervalo de dados e especifique tanto o intervalo de linhas quanto o número de linhas em branco a serem inseridas.
- Certifique-se de fazer backup da sua planilha ou experimentar isso em uma planilha de amostra primeiro, pois inserir linhas é irreversível, a menos que você use o comando Desfazer imediatamente.
Solução de problemas: Se você encontrar um erro, certifique-se de que seus dados não estão filtrados e que nenhuma tabela se sobrepõe à área selecionada. Se resultados inesperados ocorrerem, use Desfazer imediatamente para reverter as alterações.
Insira um número específico de linhas em branco no intervalo de dados com base nos valores das células com código VBA
Às vezes, seu fluxo de trabalho pode exigir a inserção de linhas em branco de acordo com uma lista predefinida de valores de células, como inserir espaços em branco após cada registro com base em critérios correspondentes. Esta solução VBA é ideal quando a lógica de inserção não é baseada em intervalos fixos, mas sim nos valores dentro de uma coluna adjacente.
✅ Quando usar:
- Recomendado quando seus dados são organizados por categorias (por exemplo, departamentos, fases de projeto ou representantes de vendas) e você precisa inserir espaçamento ou linhas em branco entre grupos.
- Certifique-se de que sua seleção esteja precisa, pois a macro usará as células selecionadas para determinar onde inserir linhas.
1. Mantenha pressionado ALT + F11 no Excel, o que abre a janela 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: Insira um número específico de linhas em branco com base em uma lista de números:
Sub Insertblankrowsbynumbers ()
'UpdatebyExtendoffice
Dim xRg As Range
Dim xAddress As String
Dim I, xNum, xLastRow, xFstRow, xCol, xCount As Long
On Error Resume Next
xAddress = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Select the spefic number column to use(single column):", "Kutools For Excel", xAddress, , , , , 8)
If xRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
xLastRow = xRg(1).End(xlDown).Row
xFstRow = xRg.Row
xCol = xRg.Column
xCount = xRg.Count
Set xRg = xRg(1)
For I = xLastRow To xFstRow Step -1
xNum = Cells(I, xCol)
If IsNumeric(xNum) And xNum > 0 Then
Rows(I + 1).Resize(xNum).Insert
xCount = xCount + xNum
End If
Next
xRg.Resize(xCount, 1).Select
Application.ScreenUpdating = True
End Sub
3. Após colar, pressione F5 para executar o código. Na caixa de diálogo que aparece, selecione a lista de números (ou células relevantes) sobre as quais as linhas em branco devem ser inseridas.
4. Em seguida, clique em OK e você verá o resultado pretendido, conforme mostrado nas seguintes capturas de tela:
 | |  |
Lembrete de erro: Se a lista de referência contiver células vazias ou dados não numéricos, verifique a lógica do código ou limpe seus dados antes de executar esta macro.
Insira um número específico de linhas em branco no intervalo de dados em intervalos fixos com um recurso prático
Se você prefere não usar VBA ou quer um método mais visual e interativo, Kutools para Excel oferece um recurso dedicado chamado Inserir Linhas e Colunas em Branco. Com simples cliques, você pode adicionar linhas ou colunas em branco em qualquer intervalo através de todo o intervalo de dados — aumentando significativamente a produtividade, especialmente em tarefas de relatórios ou formatação repetitivos.
Após instalar Kutools para Excel, siga estes passos:
1. Selecione o intervalo de dados onde você precisa inserir linhas em branco em intervalos regulares.
2. Vá para Kutools > Inserir > Inserir Linhas e Colunas em Branco, conforme mostrado abaixo:
3. Na caixa de diálogo Inserir Linha e Coluna em Branco, escolha Linhas em branco sob Tipo de inserção, depois especifique tanto o intervalo quanto o número de linhas em branco a inserir, conforme ilustrado:
Nota: A configuração é flexível. Se você precisar de duas linhas em branco após cada quatro linhas de dados, defina o intervalo como 4 e o número de linhas em branco como 2.
4. Em seguida, clique no botão OK. As linhas em branco serão inseridas dentro do intervalo selecionado no intervalo especificado, conforme demonstrado abaixo:
| | |
Vantagens: Esta solução é amigável ao usuário, não requer codificação e é particularmente útil para quem precisa ajustar frequentemente a estrutura de linhas ou colunas.
Baixe e teste gratuitamente Kutools para Excel agora!
Insira um número específico de linhas em branco em intervalos fixos com fórmulas do Excel
Se você não pode usar macros ou complementos, ainda pode alcançar o objetivo de inserir linhas em branco em intervalos fixos utilizando colunas auxiliares e funções internas do Excel como MOD e LINHA. Este método é especialmente útil quando a execução de scripts está restrita, mas o uso básico de fórmulas e classificações está disponível.
✅ Quando usar: Ideal para usuários que querem manter suas planilhas livres de macros, precisam de ampla compatibilidade ou estão preparando dados para fluxos de importação/exportação que requerem separação visual por meio de linhas em branco.
⚠️ Precauções: Este método não insere realmente linhas em branco, mas simula-as utilizando linhas adicionais e fórmulas auxiliares. Você precisará classificar os dados posteriormente para organizar os espaços simulados. É uma solução alternativa adequada para conjuntos de dados pequenos a médios.
Passos:
- Suponha que seus dados estejam nas células A2:B11. Em uma nova coluna auxiliar (por exemplo, coluna C começando de C2), insira a seguinte fórmula:
Substitua=INT((ROW()-ROW($A$2))/(n+1))npelo intervalo no qual você deseja inserir uma linha em branco. Por exemplo, para inserir uma linha em branco após cada 3 linhas, use:=INT((ROW()-ROW($A$2))/3) - Arraste a fórmula para baixo ao lado do seu conjunto de dados para atribuir números de grupo.
- Abaixo da última linha de dados, adicione linhas extras com valores em branco nas colunas A e B. Na coluna C (a coluna auxiliar), insira números de grupo que correspondam aos já presentes, para que essas linhas em branco sejam agrupadas corretamente.
- Selecione o intervalo completo (original + linhas adicionadas), depois classifique pela coluna auxiliar e aplique qualquer classificação secundária, se necessário. As linhas em branco agora aparecerão após cada n linhas de dados.
🟡 Lembrete de Erro:
- Certifique-se de atribuir os números de grupo corretos às suas linhas em branco — discrepâncias farão com que elas apareçam em lugares indesejados.
- Lembre-se, este método adiciona linhas físicas somente após a classificação, então confirme o layout final antes de salvar ou exportar.
Resumo e dicas: Embora não seja tão eficiente quanto usar VBA ou ferramentas como Kutools, este método baseado em fórmulas é universalmente compatível e não depende de scripts. Para tarefas ocasionais ou leves, ele oferece uma solução simples e flexível.
Copiar e inserir linhas várias vezes com base em números específicos com código VBA
Se sua tarefa exige não apenas inserir linhas em branco, mas também duplicar e inserir linhas de dados existentes um certo número de vezes (talvez com base em uma lista separada de números), o seguinte código VBA oferece um método automatizado prático. Isso é particularmente útil para replicar entradas para pedidos de vendas, cenários ou planejamento de recursos.
 | |  |
Para implementar isso, siga estas etapas detalhadas:
1. Mantenha pressionado ALT + F11 no Excel para abrir a janela Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo e cole o código abaixo na janela do módulo.
Código VBA: Copiar e inserir linhas várias vezes com base em números específicos:
Sub CopyRows()
'UpdatebyExtendoffice
Dim xRg As Range
Dim xCRg As Range
Dim xFNum As Integer
Dim xRN As Integer
On Error Resume Next
SelectRange:
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Select the list of numbers to copy the rows based on: ", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
If xRg.Columns.Count > 1 Then
MsgBox "Please select single column!"
GoTo SelectRange
End If
Application.ScreenUpdating = False
For xFNum = xRg.Count To 1 Step -1
Set xCRg = xRg.Item(xFNum)
xRN = CInt(xCRg.Value)
With Rows(xCRg.Row)
.Copy
.Resize(xRN).Insert
End With
Next
Application.ScreenUpdating = True
End Sub
Precauções: Sempre faça backup dos seus dados antes de executar scripts VBA que duplicam linhas, pois eles podem multiplicar rapidamente os dados e talvez não possam ser facilmente desfeitos.
3. Depois que o código estiver no lugar, pressione F5 para executar a macro. Na caixa de diálogo, selecione a lista de números que representa quantas vezes você deseja que cada linha seja duplicada e inserida.
4. Clique em OK. O número especificado de linhas será copiado e inserido sob cada linha original, conforme ilustrado abaixo:
| | |
Dica: Esta solução é melhor para tarefas de preparação de dados e não é ideal para entrada em tempo real, pois macros VBA não podem ser desfeitas se outras operações não relacionadas forem realizadas.
Copiar e inserir linhas várias vezes com base em números específicos com um recurso incrível
Para aqueles que desejam que o processo de duplicação e inserção de linhas seja intuitivo e não exija habilidades de programação, o recurso Duplicar Linhas / Colunas com base no valor da célula do Kutools para Excel é uma alternativa eficiente. Esta ferramenta permite especificar quais linhas ou colunas duplicar e quantas vezes fazê-lo, tudo com base em um valor de célula de referência ou lista com poucas seleções simples.
Após instalar Kutools para Excel, siga estes passos:
1. Vá para Kutools > Inserir > Duplicar Linhas / Colunas com base no valor da célula conforme mostrado:
2. Na caixa de diálogo Copiar e inserir linhas e colunas, selecione Copiar e inserir linhas como seu tipo, indique o intervalo de dados que deseja duplicar e, em seguida, especifique a lista de valores para usar como procura de duplicação, conforme exibido:
Dica: Use isso para gerar amostras de teste, replicar modelos de transação ou multiplicar rapidamente configurações ou registros sem script complexo.
4. Finalmente, clique em OK ou Aplicar para gerar a saída conforme demonstrado abaixo:
| | |
Nota: Certifique-se de que sua lista de valores esteja alinhada corretamente com seus dados para obter os resultados esperados.
Baixe e teste gratuitamente Kutools para Excel agora!
Mais artigos relacionados:
- Copiar e inserir linha várias vezes ou duplicar a linha X vezes
- No seu trabalho diário, você já tentou copiar uma linha ou cada linha e depois inseri-la várias vezes abaixo da linha de dados atual em uma planilha? Por exemplo, tenho um intervalo de células, agora quero copiar cada linha e colá-las 3 vezes na próxima linha, conforme mostrado na captura de tela a seguir. Como você lidaria com essa tarefa no Excel?
- Inserir linhas em branco quando o valor muda no Excel
- Supondo que você tenha um intervalo de dados, e agora quer inserir linhas em branco entre os dados quando o valor muda, para que você possa separar os valores sequenciais iguais em uma coluna, conforme mostrado nas capturas de tela a seguir. Neste artigo, vou falar sobre alguns truques para resolver esse problema.
- Inserir uma linha em branco após um texto específico no Excel
- Se você deseja inserir linhas em branco após um texto específico conforme mostrado na captura de tela a seguir, como lidar com isso rapidamente e facilmente sem inseri-las manualmente uma por uma?
- Copiar linhas de várias planilhas com base em critérios para uma nova planilha
- Supondo que você tenha uma pasta de trabalho com três planilhas que têm o mesmo formato, conforme mostrado na captura de tela a seguir. Agora, você deseja copiar todas as linhas dessas planilhas cuja coluna C contenha o texto “Concluído” para uma nova planilha. Como você resolveria esse problema rapidamente e facilmente sem copiar e colar manualmente uma por uma?
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins