Visual Basic para Aplicaciones - Como abro objetos incrustados ???

Tengo un archivo de excel con 1 libro de texto incrustado y deseo abrirlo con una macro. Ya grabé una macro para hacerlo, pero al momento de ejecutarla me marca un error. El código es el siguiente:

Windows("Automatizacion BackLog.xls").Activate
Sheets("Rpt Seguimiento").Select
ActiveSheet.Shapes("Object 17").Select
Windows("Worksheet in Automatizacion BackLog.xls").Visible =True // Aqui es donde me marca el erro (Argumento fuera de rango)
Selection.Verb Verb:=xlPrimary

Muchas gracias por su ayuda.