Excel no está instalado

[pedroluis]

Hola amigos !

Cuando quiero abrir una planilla de Excel desde mi programa, me sale el mensaje : "Excel no está instalado"
no desde el Preview ni con la librería FileXLS.

Tengo un equipo con Windows 7 64 bits,
FWH 17.09, Office 2007, Avast y Superantispyware.

Lo más curioso es que el mismo programa lo corro en otro equipo con Windows 7 de 32 bits y funciona perfectamente.
También tengo el FWH 17.09 y Office 2007, pero NO el Avast NI el Superantispyware.

A Alguien le ha pasado ?

Gracias !

[karinha]

Tal vez sea el camino del excel del windows de 64 bits.

[karinha]

Code: Select all  Expand view

   TRY
      oExcel := GetActiveObject( "Excel.Application" )
   CATCH
   TRY
      oExcel := CreateObject( "Excel.Application" )
   CATCH
      MsgInfo( "Excel no disponible. [" + Ole2TxtError() + "]" )
      RETURN .F.
      END
   END
 

[karinha]

Code: Select all  Expand view

Local oExcel
IF .not. FILE("C:\Program Files\Microsoft Office\Office12\Excel.exe")
   IF .not. FILE("C:\Program Files (x86)\Microsoft Office\Office12\Excel.exe")
       MsgStop("Excel No está disponible "+Ole2TxtError(), "Comprobar Excel")
       retu .f.
  endif
endif
Return NIl
 

[pedroluis]

Gracias !
Lo voy a tratar de arreglar.
Saludos !

[pedroluis]

Ya está arreglado !
Gracias por todo y a todos !