Luis Mondelo respondió:
Te mando mi solución. Ejecuta esta macro en un archivo nuevo y vacío y hará lo que pides: Sub ejemplo() 'por luismondelo mio = ActiveWorkbook.Name fichero = Application.GetOpenFilename If fichero = False Then Exit Sub Workbooks.Open fichero otro =...
Deseo copiar hojas de un libro cerrado a otro abierto, los nombres pueden estar variando.