Macro copiar repetidamente

Solo consultas sobre macros y código VBA Excel.
Reglas del Foro
1. Antes de hacer tu pregunta intenta con el buscador de este foro (muchas preguntas ya fueron respondidas antes!)
2. Si haces una nueva pregunta, es muy recomendable que adjuntes el ejemplo Excel para poder comprenderla mejor!
3. Realiza tu pregunta de forma clara, explicando bien cada paso de lo que haces y tendrás más probabilidad de respuesta!
Responder
perseo74
Miembro Nuevo
Miembro Nuevo
Mensajes: 2
Registrado: 09 Oct 2018 23:38

Macro copiar repetidamente

Mensaje por perseo74 » 10 Oct 2018 00:18

Hola
Tengo este caso: en la celda G3 el valor es 11 requiero que este valor se repita n veces (n se toma de la celda G6) para el ejemplo n=16.
Es decir el valor 11 se copie 16 veces a partir de la celda L1; es decir de L1 a L6 el valor debe ser 11, pero a partir de la celda L17 el valor debe ser 12 y se repite 16 veces. esta secuencia de valores se repite X veces determinado por la celda G10. Espero que en el adjunto sea mas claro.

Saludos
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.



Avatar de Usuario
Antoni
Miembro Frecuente
Miembro Frecuente
Mensajes: 6008
Registrado: 22 Dic 2009 04:58
Ubicación: GALICIA (ESPAÑA)

Re: Macro copiar repetidamente

Mensaje por Antoni » 10 Oct 2018 05:53

Prueba con esta macro:

Código: Seleccionar todo

Sub Repetir(): Dim x As Long, y As Long
Application.ScreenUpdating = False
For x = [G3] To [G12]
   For y = 1 To [G6]
      fila = fila + 1
      Range("M" & fila) = x
   Next
Next
End Sub



perseo74
Miembro Nuevo
Miembro Nuevo
Mensajes: 2
Registrado: 09 Oct 2018 23:38

Re: Macro copiar repetidamente

Mensaje por perseo74 » 10 Oct 2018 23:27

Muchas gracias, funciona perfectamente



Responder