Page 1 of 1

Excel no está instalado

PostPosted: Sun Jul 01, 2018 12:53 pm
by 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 !

Re: Excel no está instalado

PostPosted: Mon Jul 02, 2018 1:12 pm
by karinha
Tal vez sea el camino del excel del windows de 64 bits.

Re: Excel no está instalado

PostPosted: Mon Jul 02, 2018 5:33 pm
by 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
 

Re: Excel no está instalado

PostPosted: Mon Jul 02, 2018 5:37 pm
by 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
 

Re: Excel no está instalado

PostPosted: Mon Jul 02, 2018 7:47 pm
by pedroluis
Gracias !
Lo voy a tratar de arreglar.
Saludos !

Re: Excel no está instalado

PostPosted: Tue Jul 03, 2018 6:23 pm
by pedroluis
Ya está arreglado !
Gracias por todo y a todos !