Vincular 3 hojas de excel
Que tal, quería saber si hay forma de poder tener una hoja de calculo llamada "Datos Semanales" donde pueda insertar datos, teniendo en la fila1 el nombre de los campos y la fila2 con el único dato que le voy a introducir una vez a la semana y en otra llamada "Historial Semanal" se vayan vinculando y guardando automáticamente los datos que pongo en la semana para que se vayan llenando en esa hoja de calculo
1 respuesta
Respuesta de Enrique Bernal
1
Este código hace lo que necesitas.
Sub Guarda()
Rows("2:2").Select
Selection.Copy
Sheets("Historial semanal").Select
k = Range("F" & Cells.Rows.Count).End(xlUp).Row + 1
Rows(k).Select
ActiveSheet.Paste
Sheets("Datos Semanales").Select
Rows("2:2").ClearContents
End Sub
Cabe mencionar que para que funcione tu hoja Datos semanales y tu hoja Historial de la semana deben tener el mismo orden, si no tienen el mismo orden también se puede pero la macro se vuelve más lenta.
También puse un código al final para que una vez guardada la info se borre la fila 2.
Cualquier duda me avisas.
Sub Guarda()
Rows("2:2").Select
Selection.Copy
Sheets("Historial semanal").Select
k = Range("F" & Cells.Rows.Count).End(xlUp).Row + 1
Rows(k).Select
ActiveSheet.Paste
Sheets("Datos Semanales").Select
Rows("2:2").ClearContents
End Sub
Cabe mencionar que para que funcione tu hoja Datos semanales y tu hoja Historial de la semana deben tener el mismo orden, si no tienen el mismo orden también se puede pero la macro se vuelve más lenta.
También puse un código al final para que una vez guardada la info se borre la fila 2.
Cualquier duda me avisas.
