¿Copiar un rango de celdas y pegarlas "n" cantidad de veces en Excel?

Como puedo copiar una rango de celdas (A1:¿BU15) y luego pergarlas una fila abajo hasta 15 veces en excel? He intentado mediante códigos en VBA pero no me funcionan.

1 Respuesta

Respuesta
1

Prueba con algo como:

Sub prueba()
    Dim h As Worksheet, r As Range, n As Long
    Set h = Worksheets("Hoja1")
    Set r = h.Range("A1:BU15")
    For n = r.Rows.Count + 1 To r.Rows.Count * 15 + 1 Step r.Rows.Count
        r.Copy Destination:=h.Cells(n, 1)
    Next n
    Application.CutCopyMode = False
    Set r = Nothing
    Set h = Nothing
End Sub

Saludos_

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas