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

Por ejemplo, tiene una lista de valores en la Columna A y desea repetir los valores un número específico de veces según el número de veces en la Columna B, como se muestra en la captura de pantalla de la izquierda, ¿cómo podría lograr esto en Excel?
Repita los valores de celda X veces con la fórmula y la columna auxiliar
Para repetir los valores de celda X veces, puede insertar algunas columnas auxiliares y luego aplicar una fórmula simple, siga los siguientes pasos:
1. Inserte una columna a la izquierda de la columna A y escriba 1 en la celda A2, vea la captura de pantalla:
2. Entonces pon esta fórmula = A2 + C2 en A3 y arrastre el controlador de relleno a la celda A6, vea la captura de pantalla:
3. Y luego ingrese 1 en la celda D2, y complete el número arrastrando Auto Fill a 12, que es el número total del número de veces en la columna C, vea la captura de pantalla:
4. Luego ingrese esta fórmula = BUSCARV (D2, $ A $ 1: $ B $ 6,2) en la celda E2 y cópielo, obtendrá el siguiente resultado:
- Notas:
- 1. En esta fórmula, D2 indica la primera celda que está llena con la secuencia numérica, y A1: B6 representa el rango de la primera columna auxiliar y los valores de celda originales que necesita repetir.
- 2. Después de obtener los valores repetidos, puede copiarlos y pegarlos como valores en cualquier otro lugar.
Copie e inserte filas X veces en función de un número específico fácilmente
Normalmente, no existe un buen método para copiar e insertar filas varias veces, excepto para copiar e insertar manualmente. Pero con Kutools for Excel's Filas / columnas duplicadas según el valor de la celda característica, puede resolver este problema con facilidad. ¡Haga clic para descargar Kutools para Excel!
Kutools for Excel: con más de 300 prácticos complementos de Excel, prueba gratuita y sin límite en 60 días. ¡Descarga y prueba gratis ahora!
Repita los valores de celda X veces con el código VBA
Si considera que el primer método es difícil de entender, aquí también puedo presentarle el código VBA para resolverlo.
1. Mantenga pulsado el ALT + F11 llaves, y abre el Ventana de Microsoft Visual Basic para Aplicaciones.
2. Hacer clic recuadro > Móduloy pegue el siguiente código en el Ventana de módulo.
Código de VBA: repite los 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
3. Entonces presione F5 para ejecutar este código, y aparecerá un cuadro de aviso para recordarle que seleccione el rango que contiene los valores y las veces repetidas, vea la captura de pantalla:
Copie e inserte valores de celda X veces con una característica increíble
A veces, es posible que deba copiar e insertar los valores de celda x veces en función del número específico, Kutools for Excel's Filas / columnas duplicadas según el valor de la celda puede ayudarlo a copiar e insertar rápidamente las filas según el número que especificó.
Consejos:Para aplicar esto Filas / columnas duplicadas según el valor de la celda función, en primer lugar, debe descargar la Kutools for Excely, a continuación, aplique la función de forma rápida y sencilla.
Después de instalar Kutools for Excel, haz lo siguiente:
1. Hacer clic Kutools > recuadro > Filas / columnas duplicadas según el valor de la celda, ver captura de pantalla:
2. En la Copiar e insertar filas y columnas cuadro de diálogo, seleccione Copiar e insertar filas opción en el Tipo sección, luego seleccione el rango de datos que desea duplicar, y luego especifique el tiempo de repetición para copiar e insertar las filas, vea la captura de pantalla:
4. Luego, haz clic Ok or Aplicar botón, obtendrá el siguiente resultado cuando lo necesite:
![]() |
![]() |
![]() |
¡Haga clic para descargar Kutools para Excel y prueba gratuita ahora!
Las mejores herramientas de productividad de oficina
Kutools para Excel resuelve la mayoría de sus problemas y aumenta su productividad en un 80%
- Reutilizar: Inserte rápidamente fórmulas complejas, gráficos y cualquier cosa que hayas usado antes; Cifrar celdas con contraseña; Crear lista de distribución y enviar correos electrónicos ...
- Barra de súper fórmula (edite fácilmente varias líneas de texto y fórmulas); Diseño de lectura (leer y editar fácilmente un gran número de celdas); Pegar en rango filtrado...
- Combinar celdas / filas / columnas sin perder datos; Contenido de celdas divididas; Combinar filas / columnas duplicadas... Prevenir celdas duplicadas; Comparar rangos...
- Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
- Copia exacta Varias celdas sin cambiar la referencia de la fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, Casillas de verificación y más ...
- Extraer texto, Agregar texto, Eliminar por posición, Quitar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
- Súper filtro (guardar y aplicar esquemas de filtros a otras hojas); Orden avanzado por mes / semana / día, frecuencia y más; Filtro especial en negrita, cursiva ...
- Combinar libros y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes de xls, xlsx y PDF...
- Más de 300 potentes funciones. Compatible con Office/Excel 2007-2021 y 365. Compatible con todos los idiomas. Fácil implementación en su empresa u organización. Funciones completas Prueba gratuita de 30 días. Garantía de devolución de dinero de 60 días.

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!




















