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!

Macro copiar repetidamente

Notapor 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 tiene los permisos requeridos para ver los archivos adjuntos a este mensaje.
perseo74
Miembro Nuevo
Miembro Nuevo
 
Mensajes: 2
Registrado: 09 Oct 2018 23:38

Re: Macro copiar repetidamente

Notapor 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
Avatar de Usuario
Antoni
Miembro Frecuente
Miembro Frecuente
 
Mensajes: 5583
Registrado: 22 Dic 2009 04:58
Ubicación: GALICIA (ESPAÑA)

Re: Macro copiar repetidamente

Notapor perseo74 » 10 Oct 2018 23:27

Muchas gracias, funciona perfectamente
perseo74
Miembro Nuevo
Miembro Nuevo
 
Mensajes: 2
Registrado: 09 Oct 2018 23:38


Volver a Macros

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 11 invitados
cron