Copiar filas nuevas de varias hojas (añadidas casi diariamente) a una hoja resumen
En el trabajo utilizo un excel con 10 hojas, en las cuales se añade información cada dos o tres días. Me gustaría tener toda esa información recogida en una hoja "Resumen" y que se vaya actualizando conforme introduzco nuevas filas.
¿Sabéis algún código/macro que me permita realizar esta acción?
1 respuesta
Respuesta de Aneudys Martinez
Desde el evento change de las hojas puedes conseguir eso
Con el procedimiento target
Ejemplo
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("L2:L100")) <> "" Then
SheetS("RESUMEN").Range("A1000").End(xlUp).Offset(1, 0) = Target
End If
End SubEN ESTE EJEMPLO CUANDO DIJITE ALGO EN EL RANGO DE L2 HASTA L100
Este copiara la celda a la hoja resumen en la ultima fila vacía
