Cobol Foro - [Duda] Verificar si Excel (Office) está instalado

Cobol Foro (https://www.cobolforo.es/index.php)

- PowerCOBOL (ActiveX, v4 - v11) (https://www.cobolforo.es/forumdisplay.php?f=9)

- - [Duda] Verificar si Excel (Office) está instalado (https://www.cobolforo.es/showthread.php?t=352)

Verificar si Excel (Office) está instalado

Como posso validar se o Excel esta instalado?
Se não tiver instalado dá erro e sai do sistema...

Muito obrigado por qualquer ajuda.

Joseg, tienes que mirar en el Registro de Windows si hay algo en:

Código:

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office

Cita:

Citación del post de Kuk (Mensaje 1698)

Joseg, tienes que mirar en el Registro de Windows si hay algo en:

Código:

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office

Gracias :)

Joseg, para agradecer usa el botón "Gracias".

En dicha rama de Registro de Windows también puedes determinar cual es la versión instalada:

Código VB:

Private Sub Determine_OfficeVersion_1()
        Dim objEApp As Excel.Application 'Excel Object
        Dim strEVersion As String 'Identify Version
 
        objEApp = DirectCast(CreateObject("Excel.Application"), Excel.Application) 'Cast To Excel App
 
        Select Case objEApp.Version 'Determine Version
            Case "7.0"
                strEVersion = "95"
            Case "8.0"
                strEVersion = "97"
            Case "9.0"
                strEVersion = "2000"
            Case "10.0"
                strEVersion = "2002"
            Case "11.0"
                strEVersion = "2003"
            Case "12.0"
                strEVersion = "2007"
            Case "14.0"
                strEVersion = "2010"
        End Select

También lo que he pensado, siguiendo este ejemplo... : Exportar CmListview en Excel - COBOL Foro

Cuando haces:

Código COBOL:

     INVOKE OLE "CREATE-OBJECT" USING APPLICATION RETURNING EXCEL.

Si el Excel no está instalado, debería de saltar en DECLARATIVES porque viene a ser OLE-EXCEPTION: [Sintaxis] Como descifrar valores de COM-EXCEPTION - COBOL Foro