Visual Basic - ERROR AL EXPORTAR A EXCEL

He creado un formulario con un boton para exportar datos a excel creando una hoja nueva. Pues bien, en cuanto pulso el botón me da un error y me dice "Fallo en el metodo 'visible' del objeto '_Application'".

¿Alguien me puede ayudar?

Gracias de antemano.

Jesús

Te adjunto un pequeño código que utilizo para abrir un libro excel, que espero te sirva.
Dim HExcel as Object
Set HExcel = CreateObject("Excel.Application")
'HExcel.Workbooks.Open "C:\Visual_Basic\Ampliacion.Xls"
HExcel.Workbooks.Open App.Path & "\Ampliacion.Xls"
HExcel.Visible = True
HExcel.ActiveWorkbook.Worksheets("Hoja1").Activate
'RESTO DE CÓDIGO.

Espero te sirva. Saludos Pola