Ver Mensaje Individual
  #4
Antiguo 16 de marzo de 2016, 15:00
Kuk
Administrador
Última Actividad 03.10.2026 00:00
Posts Posts: 2.500
Likes enviados Enviados: 1038
Likes recibidos Recibidos: 1207

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:
  1. Private Sub Determine_OfficeVersion_1()
  2.         Dim objEApp As Excel.Application 'Excel Object
  3.        Dim strEVersion As String 'Identify Version
  4.  
  5.         objEApp = DirectCast(CreateObject("Excel.Application"), Excel.Application) 'Cast To Excel App
  6.  
  7.         Select Case objEApp.Version 'Determine Version
  8.            Case "7.0"
  9.                 strEVersion = "95"
  10.             Case "8.0"
  11.                 strEVersion = "97"
  12.             Case "9.0"
  13.                 strEVersion = "2000"
  14.             Case "10.0"
  15.                 strEVersion = "2002"
  16.             Case "11.0"
  17.                 strEVersion = "2003"
  18.             Case "12.0"
  19.                 strEVersion = "2007"
  20.             Case "14.0"
  21.                 strEVersion = "2010"
  22.         End Select

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

Cuando haces:

Código COBOL:
  1.      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



NORMAS DEL FORO - para garantizar el buen funcionamiento del Foro.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale haciendo clic en su Nick
Kuk is offline   Responder Con Cita