Como repetir o valor da célula x vezes no Excel?

Por exemplo, você tem uma lista de valores na Coluna A e deseja repetir esses valores um número específico de vezes com base no número de vezes indicado na Coluna B, conforme mostrado na captura de tela à esquerda. Como você poderia fazer isso no Excel?
Repetir valores de células X vezes com fórmula e coluna auxiliar
Para repetir os valores das células X vezes, você pode inserir algumas colunas auxiliares e depois aplicar uma fórmula simples. Siga os passos abaixo:
1. Insira uma coluna à esquerda da coluna A e digite 1 na célula A2, veja a captura de tela:
2. Em seguida, insira esta fórmula =A2 + C2 em A3 e arraste a alça de preenchimento até a célula A6, veja a captura de tela:
3. Depois, insira 1 na célula D2 e preencha os números arrastando o Auto Preenchimento até 12, que é o número total de vezes indicado na coluna C, veja a captura de tela:
4. Em seguida, insira esta fórmula =PROCV(D2,$A$1:$B$6,2) na célula E2 e copie para baixo, e você obterá o seguinte resultado:
- Notas:
- 1. Nesta fórmula, D2 indica a primeira célula preenchida com a sequência numérica, e A1:B6 representa o intervalo da primeira coluna auxiliar e os valores originais das células que precisam ser repetidos.
- 2. Após obter os valores repetidos, você pode copiá-los e colá-los como valores em qualquer outro lugar.
Copiar e inserir linhas X vezes com base em um número específico facilmente
Normalmente, não há um bom método para copiar e inserir linhas várias vezes, exceto lidando manualmente com cópia e inserção. No entanto, com o Kutools for Excel e seu recurso Copiar ou Inserir Linhas/Colunas de Acordo com Dados Especificados, você pode resolver esse problema com facilidade. Clique para baixar Kutools for Excel!
Kutools for Excel: com mais de 300 complementos úteis para o Excel, grátis para experimentar sem limitação por 60 dias. Baixe e experimente agora gratuitamente!
Repetir valores de células X vezes com código VBA
Se você considera o primeiro método difícil de entender, aqui também posso apresentar um código VBA para resolvê-lo.
1. Pressione as teclas ALT + F11, e abrirá 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: Repetir valores de células X vezes
Sub CopyData()
'Updateby Extendoffice
Dim Rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set OutRng = OutRng.Range("A1")
For Each Rng In InputRng.Rows
xValue = Rng.Range("A1").Value
xNum = Rng.Range("B1").Value
OutRng.Resize(xNum, 1).Value = xValue
Set OutRng = OutRng.Offset(xNum, 0)
Next
End Sub
3. Em seguida, pressione F5 para executar este código, e uma caixa de aviso aparecerá para lembrá-lo de selecionar o intervalo que contém os valores e o número de repetições, veja a captura de tela: Copiar e inserir valores de células X vezes com um recurso incrível
Às vezes, você pode precisar copiar e inserir os valores das células x vezes com base em um número específico, o Kutools for Excel e seu recurso Copiar ou Inserir Linhas/Colunas de Acordo com Dados Especificados podem ajudá-lo a copiar e inserir rapidamente as linhas com base no número especificado.
Após instalar o Kutools for Excel, faça o seguinte:
1. Clique em Kutools > Inserir > Copiar ou Inserir Linhas/Colunas de Acordo com Dados Especificados, veja a captura de tela:
2. Na caixa de diálogo Copiar e inserir linhas & colunas, selecione a opção Copiar e inserir linhas na seção Tipo, depois selecione o intervalo de dados que deseja duplicar e especifique o tempo de repetição para copiar e inserir as linhas, veja a captura de tela:
4. Em seguida, clique no botão Ok ou Aplicar, e você obterá o seguinte resultado conforme necessário:
![]() | ![]() | ![]() |
Clique para baixar Kutools for Excel e experimente agora gratuitamente!
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência sem igual. Kutools para Excel oferece mais de300 recursos avançados para aumentar sua produtividade e economizar tempo.Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface de abas para o Office e facilita muito seu trabalho
- Habilite a edição e leitura com abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas abas da mesma janela, em vez de novas janelas.
- Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!