Ingresar serie de datos a otra hoja en un mismo libro.
Necesito ayuda para guardar información dentro de un mismo libro:
1º Copiar por primera vez desde la Hoja 1 a la Hoja Bodega el rango B4:F6.
B C D E F
4 PEDRO 12 345 678 901
5 JOSÉ 67 890 123 456
6 MÓNICA 25 678 901 234
2º Copiar el día 2 en la hoja Bodega a continuación del día 01
B C D E F
4 Claudio 34 567 890 1xx
5 Carmen 89 0B1 23L 456
6 Daniel A2 567 890 1U2
Así es lo que necesito, que la macro ubique la última fila libre y copie la información del día siguiente
B C D E F
4 PEDRO 12 345 678 901
5 JOSÉ 67 890 123 456
6 MÓNICA 25 678 901 234
7 Claudio 34 567 890 1xx
8 Carmen 89 0B1 23L 456
9 Daniel A2 567 890 1U2
Muchísimas gracias por su ayuda
1 Respuesta
Aquí te dejo la macro que necesitas
Sub copiado()
'por luismondelo
Sheets("hoja1").Select
Range("b4:f6"). Copy
Sheets("bodega"). Range("b65000").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlValues
Application.CutCopyMode = False
End Subrecuerda finalizar
