Deseo copiar hojas especificas de un libro cerrado a otro abierto
Es decir. Tengo un libro cerrado en el que hay varias hojas con información y necesito solo copiar dos en un libro nuevo para trabajar con ellas.
Ya he usado como base este código de una pregunta de alguien mas, pero no he podido adaptarlo a lo que quiero.
Sub ejemplo()
'por luismondelo
mio = ActiveWorkbook.Name
fichero = Application.GetOpenFilename
If fichero = False Then Exit Sub
Workbooks.Open fichero
otro = ActiveWorkbook.Name
For Each hoja In ActiveWorkbook.Sheets
hoja.Copy before:=sheets(1)
Next
Workbooks(otro).Close False
End Sub
Muchas gracias por las respuestas que me puedan proveer.