copiar datos a otro libro

1 post / 0 nuevos
DudaPorEmail
Imagen de DudaPorEmail
Offline
última acción: Hace 4 meses 20 horas
Nivel 1 - 200 puntos
alta: 15/10/2013 - 07:56
Puntos: 773
copiar datos a otro libro

Tengo 2 libros con diferentes nombres, pero las hojas en ambos libros tienen el mismo nombre. Lo que necesito es que se copien los valores los datos de cada hoja del libro origen y se peguen como valores en las hojas que le correspopnden en el libro destino...

El nombre de mi libro origen es INICIO y el nombre de mi libro destino es FIN. La primera hoja de mi libro origen es datos y corresponde a la primera hoja de mi libro destino.

 

Sub copiarAotroLibro()
Application.ScreenUpdating = False
Workbooks.Open ("C:\Users\eariza\Desktop\REPORTES\FIN.xlsx")
Windows("INICIO.xlsm").Activate
Sheets("Sheet1").Copy After:=Workbooks("FIN.xlsx").Sheets("datos")
Application.ScreenUpdating = True
ActiveWorkbook.Save

End Sub

 

Agradezco de antemano!

Etiquetas: