csarxex fmv respondió:
Prueba con esto: Sheets("Hoja1").Select Sheets("Hoja1"). Copy Windows("Libro1"). Activate Sheets("Hoja2").Select Sheets("Hoja2").Copy Before:=Workbooks("Libro2").Sheets(1) Windows("Libro1").Activate Sheets("Hoja3").Select Sheets("Hoja3").Copy...