FiveTech Support Forums

Hola,

Estoy probando los ejemplos de la clase TExcel y me da un mensaje siempre antes de hacer lo que cada ejemplo hace, el mensaje es:
"No está Excel instalado en esta PC" que se encuentra en este método de la clase:

METHOD NEW() CLASS TExcelScript
::lExcel := .T.
TRY
::oExcel := GetActiveObject( "Excel.Application" )
::oClip:=TClipBoard():New()
::oClip:Clear()
CATCH
TRY
::oExcel := CreateObject( "Excel.Application" )
::oClip:=TClipBoard():New()
::oClip:Clear()
CATCH
Alert( "No está Excel Instalado en esta Pc." ) //acá está
::lExcel := .F.
END
END
::aExcelCols := {}
RETURN( Self )

Porqué me hace este problema, siendo que luego abre Excel perfectamente y me arma la planilla?
Agradezco cualquier ayuda.

José

A titulo informativo les digo que este problema me lo produce utilizando Windows XP y Microsoft Office 2003.

Gracias.

José,

Debe estar generándose algún tipo de error en la secuencia del TRY, por eso pasa a la parte CATCH. Si todo te funciona bien, prueba a modificar la clase y comentar esos avisos.

Con respecto a este tema, lo solucionaron, o simplemente sacamos la linea del CATH?

No se produce ese error si se tiene una ventana abierta como en los ejemplos.