Copiar rango de celdas

Hola,

necesito que me vuelvas ayudar
Necesito una ultima cosa que no soy capaz de lograr.
Es copiar una rango de celdas en una fila (por ejemplo C5:AB5) y que la
pegue en la siguiente fila (C6:AB6) y asi sucesivamente cada vez que se
ejecute la macro.
Muchas gracias y un saludo

1 Respuesta

Respuesta
1

Utiliza esta

Sub copfila()
'Por.DAM
uf = Range("C" & Rows.Count).End(xlUp).Row + 1
If uf <= 5 Then uf = 6
Range("C5:AB5").Copy Range("C" & uf)
End Sub

Saludos.DAM
Si es lo que necesitas.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas