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

Por ejemplo, tienes una lista de valores en la columna A y quieres repetir esos valores un número específico de veces basado en los números de la columna B, como se muestra en la captura de pantalla de la izquierda. ¿Cómo podrías lograr esto en Excel?
Repetir valores de celdas X veces con fórmula y columna auxiliar
Para repetir los valores de las celdas X veces, puedes insertar algunas columnas auxiliares y luego aplicar una fórmula simple. Por favor, sigue los siguientes pasos:
1. Inserta una columna a la izquierda de la columna A y escribe 1 en la celda A2, ver captura de pantalla:
2. Luego, introduce esta fórmula =A2 + C2 en A3 y arrastra el controlador de relleno hasta la celda A6, ver captura de pantalla:
3. Luego, introduce 1 en la celda D2 y completa los números arrastrando el Auto Relleno hasta 12, que es el número total de veces en la columna C, ver captura de pantalla:
4. Luego, introduce esta fórmula =BUSCARV(D2,$A$1:$B$6,2) en la celda E2 y copia hacia abajo, obtendrás el siguiente resultado:
- Notas:
- 1. En esta fórmula, D2 indica la primera celda donde has llenado la secuencia de números, y A1:B6 representa el rango de la primera columna auxiliar y los valores originales de las celdas que necesitas repetir.
- 2. Después de obtener los valores repetidos, puedes copiarlos y pegarlos como valores en cualquier otro lugar.
Copiar e insertar filas X veces basadas en un número específico fácilmente
Normalmente, no hay un buen método para copiar e insertar filas varias veces excepto hacerlo manualmente. Pero, con la función Copiar o Insertar Filas/Columnas Según Datos Especificados de Kutools para Excel, puedes resolver este problema con facilidad. ¡Haz clic para descargar Kutools para Excel!
Kutools para Excel: con más de 300 complementos útiles para Excel, prueba gratis sin limitaciones durante 60 días. ¡Descarga y prueba gratis ahora!
Repetir valores de celdas X veces con código VBA
Si consideras que el primer método es difícil de entender, aquí también puedo presentarte un código VBA para resolverlo.
1. Mantén presionadas las teclas ALT + F11, y se abrirá la ventana Microsoft Visual Basic para Aplicaciones.
2. Haz clic en Insertar > Módulo, y pega el siguiente código en la Ventana del Módulo.
Código VBA: Repetir valores de celdas 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
3. Luego presiona F5 para ejecutar este código, y aparecerá un cuadro de diálogo para recordarte que selecciones el rango que contiene los valores y las veces que se repetirán, ver captura de pantalla: Copiar e insertar valores de celdas X veces con una función impresionante
A veces, puede que necesites copiar e insertar los valores de las celdas x veces basándote en un número específico; Copiar o Insertar Filas/Columnas Según Datos Especificados de Kutools para Excel puede ayudarte a copiar e insertar rápidamente las filas basadas en el número que especifiques.
Después de instalar Kutools para Excel, por favor, haz lo siguiente:
1. Haz clic en Kutools > Insertar > Copiar o Insertar Filas/Columnas Según Datos Especificados, ver captura de pantalla:
2. En el Copiar e insertar filas y columnas cuadro de diálogo, selecciona la opción Copiar e insertar filas en la sección Tipo, luego selecciona el rango de datos que deseas duplicar y especifica el tiempo de repetición para copiar e insertar las filas, ver captura de pantalla:
4. Luego, haz clic en el botón Aceptar o Aplicar, obtendrás el siguiente resultado según lo necesitado:
![]() | ![]() | ![]() |
¡Haz clic para descargar Kutools para Excel y prueba gratis ahora!
Las mejores herramientas de productividad para Office
Potencia tus habilidades en Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...
Office Tab lleva la interfaz de pestañas a Office y facilita mucho tu trabajo
- Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de nuevas ventanas.
- ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!