Como repetir linhas um número específico de vezes com base em outra coluna no Excel?

Você já tentou repetir uma linha com base no valor de outra coluna, como mostrado na captura de tela abaixo? Neste artigo, vou apresentar o método para resolver essa tarefa no Excel.

Repetir linhas com base no valor de outra coluna usando VBA

Repetir linhas com base no valor de outra coluna usando Kutools para Excel

Repetir linhas com base no valor de outra coluna usando VBA

Aqui tenho um código que pode rapidamente repetir as linhas com base nos valores da última coluna.

1. Pressione Alt + F11 para habilitar a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo, depois copie o código abaixo e cole-o no novo script do Módulo.

VBA: Repetir linhas com base no valor de outra coluna

Sub CopyRow()
'UpdatebyExtendoffice20181011
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 number value", "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

3. Pressione F5 uma caixa de diálogo aparece, selecione a lista de números com base nos quais as linhas serão repetidas.

4. Clique em OK, as linhas terão sido repetidas com base no valor da coluna selecionada.

Repetir linhas com base no valor de outra coluna usando Kutools para Excel

Se você não é bom em usar VBA, pode experimentar o recurso Duplicar Linhas/Colunas Com Base no Valor da Célula do Kutools para Excel, que requer apenas dois passos.

1. Clique Kutools > Inserir > Duplicar Linhas/Colunas Com Base no Valor da Célula.

2. Na caixa de diálogo que surge, escolha Copiar e inserir linhas opção no campo Tipo seção, depois escolha o intervalo que deseja repetir no campo Intervalo de Inserçãoe escolha a coluna que decide o número de repetições no campo Número de Repetições Clique Ok.

Então as linhas serão repetidas com base na coluna selecionada.