Duda con traslado de datos en Excel
Buenas gente!
A ver si me pueden echar una mano con este problema que se me ha presentado en Excel.
Tengo unos valores que yo introduzco y me da unos valores finales después de hacer todos los cálculos y tal, lo que pasa es que es un programa de un solo uso y si quiero hacer nuevos cálculos tengo que borrar los datos antiguos (Para esto he creado un botón con Macros para que haga el trabajo)
Lo que quiero es que los valores finales y algunos iniciales, se me pasen a la hoja2, agrupados en una sola fila, para poder consultarlos más adelante. Todo esto antes de darle al botón "Borrar", y que si introduzco nuevos datos y los "Archivo" (Vamos a llamarle así al botón que quiero crear) me los guarde en la siguiente fila en la hoja2.
Muchas gracias.
1 Respuesta
Te anexo la macro "Archivar", cambia las celdas "A3, B3, D3", por las celdas que quieras archivar. Ejecuta la macro en la hoja1 y en automático copiará las celdas a la hoja2 en la siguiente fila vacía.
Sub Archivar()
'Por.Dante Amor
Application.ScreenUpdating = False
Range("A3,B3,D3").Copy
u = Sheets("Hoja2").Range("A" & Rows.Count).End(xlUp).Row + 1
Sheets("Hoja2").Range("A" & u).PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End Sub
