Visual Basic - Problema con Excel y VB

Tengo un problema , el programita estaba funcionando bien y me salio este error

Run-Time error '-2147023067(80070725)'
Automation error

y tengo este en vb basic
Set myxt = Nothing
Set myxt = CreateObject("Excel.Application")
myxt.Application.workbooks.Open (App.Path + "\reportes\lista.xls") ' AQUI ME MARCA ERROR
myxt.Worksheets("Hoja4").Activate
myxt.Visible = True

no se que paso que estaba correctamente todo y que podra ser ya verifique referencias y componentes ???
Alguien me puede ayudar
Agradezco antemano
Gracias

Te envío un código a tu E-Mail, yo es el que utilizo y no tengo problemas espero te sirva.

Por lo que cuentas me dá la impresión de que el archivo que intentas abrir tiene alguna macro que interfiere con tu programa.
Prueba a abrir el archivo con Excel directamente y anular las macros que estén ligadas a los procedimientos de evento WorkSheet_Activate, o WorkBook_Open, o cualquier otra que se active al abrir el archivo.
El error de "Automation Error" suele ocurrir con macros XLA (Excel Automation), es decir, que lo provoca Excel y no VB.

Espero que te sirva.
Saludos
Josetxu.