¿Cómo repetir un valor de celda x veces en Excel?

---

Repetir valores de celda X veces con fórmula y columna auxiliar

Para repetir los valores de una celda X veces, basta con insertar algunas columnas auxiliares y aplicar después una fórmula sencilla. Siga estos pasos:

1. Inserte una columna a la izquierda de la columna A y escriba 1 en la celda A2 (véase la captura de pantalla):

2. A continuación, introduzca esta fórmula =A2 + C2 en la celda A3 y arrastre el controlador de relleno hasta la celda A6 (véase la captura de pantalla):

3. A continuación, introduzca 1 en la celda D2 y rellene los números arrastrando el control de autorrelleno hasta el 12, que corresponde al número total de repeticiones indicado en la columna C (véase la captura de pantalla):

4. A continuación, introduzca la siguiente fórmula en la celda E2:=BUSCARV(D2;$A$1:$B$6;2) y cópiela hacia abajo. Obtendrá el siguiente resultado:

---

---

Repetir valores de celda X veces con código VBA

Si le resulta difícil comprender el primer método, aquí tiene también un código VBA para resolverlo.

1. Mantenga pulsadas las teclas ALT + F11 para abrir la ventana Microsoft Visual Basic para Aplicaciones.

2. Haga clic en Insertar > Módulo y pegue el siguiente código en la ventana del módulo.

Código VBA: Repetir valores de celda X veces

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

3A continuación, pulse F5Para ejecutar este código, aparecerá un cuadro de diálogo que le recordará seleccionar el rango que contiene los valores y las veces de repetición (véase la captura de pantalla):

4Y haga clic en Aceptar, aparecerá otro cuadro de diálogo para que seleccione una celda donde colocar el resultado (véase la captura de pantalla):

5. Luego, haga clic en Aceptary obtendrá el resultado con los valores seleccionados repetidos el número de veces que especifique, según sus necesidades.

---

Copiar e insertar valores de celda X veces con una función excelente

A veces, puede necesitar copiar e insertar los valores de una celda x veces según un número específico. La función Kutools para Excel de Copiar o Insertar Filas/Columnas Según Datos Especificados le permite copiar e insertar filas rápidamente según el número que especifique.

Tras instalar Kutools para Excel, proceda de la siguiente manera:

1. Haga clic en Kutools > Insertar > Copiar o insertar filas/columnas según datos especificados (véase la captura de pantalla):

2. En el cuadro de diálogo Copiar e Insertar Filas/Columnas, seleccione la opción Copiar e Insertar Filas en la sección Tipo, luego elija los rangos de datos que desea duplicar e indique el número de repeticiones para copiar e insertar las filas (véase la captura de pantalla):

4. A continuación, haga clic en el botón Aceptar o Aplicar y obtendrá el siguiente resultado según sus necesidades:

¡Haga clic para descargar Kutools para Excel y probarlo gratis ahora!