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.

Añade tu respuesta

Haz clic para o