Gracias Rui Pinto (Rapinto)
COBOL Foro
Foro dedicado a COBOL, a la Programación y a la Informática.
Retroceder   COBOL Foro > IDE-s y compiladores COBOL > Fujitsu COBOL > PowerCOBOL y COM/OLE
PowerCOBOL y COM/OLE La utilización de COM / OLE en PowerCOBOL
Noticias y Avisos
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Sintaxis] Ocultar/mostrar una hoja en Excel Hrmcobol PowerCOBOL (ActiveX, v4 - v11) 2 8 de abril de 2018 22:05
[Información] Ocultar columna en un ListView Josber PowerCOBOL (ActiveX, v4 - v11) 5 29 de octubre de 2016 23:12
[Sintaxis] Color en Lineas Del ComboBox Hrmcobol PowerCOBOL (ActiveX, v4 - v11) 3 17 de enero de 2016 21:44
Respuesta
 
Herramientas

  #1
Antiguo 30 de julio de 2016, 15:12
IDENTIFICATION DIVISION
Hrmcobol
Guardián del Foro
ENVIRONMENT DIVISION
Avatar de Hrmcobol
DATA DIVISION
Forero desde (Registrado)febrero 2015
Argentina
UbicaciónPuerto Madryn
Edad67 años
Última Actividad02.11.2019 01:14
PROCEDURE DIVISION
PostsPosts: 261
Ha dicho GraciasEnviado: 92
Ha recibido agradecimientosRecibido: 83
Mejores respuestasSoluiones: 8
Medallas recibidas: 1Medallas: Guardián del Foro: Guardián del espíritu y clima del Foro - Razón: Por implicación en la vida del Foro 
ReputaciónReputación: 12
Hrmcobol is a glorious beacon of light Hrmcobol is a glorious beacon of light Hrmcobol is a glorious beacon of light Hrmcobol is a glorious beacon of light Hrmcobol is a glorious beacon of light Hrmcobol is a glorious beacon of light Hrmcobol is a glorious beacon of light
Tabla Color de una columna de un Gráfico en Excel

Hola Camaradas, hay alguna manera de cambiarles el color a una celda y una columna de un gráfico en Excel desde PW?
Saludos
Hrmcobol no ha iniciado sesión   Responder Con Cita
Mejores respuestas Soluciones: 1
  #2
Antiguo 2 de agosto de 2016, 18:26
IDENTIFICATION DIVISION
Rapinto
Gran amigo del Foro y Guru de COBOL
ENVIRONMENT DIVISION
Avatar de Rapinto
DATA DIVISION
Forero desde (Registrado)febrero 2015
Portugal
UbicaciónPorto
Última Actividad29.01.2018 20:23
PROCEDURE DIVISION
PostsPosts: 246
Ha dicho GraciasEnviado: 19
Ha recibido agradecimientosRecibido: 215
Mejores respuestasSoluiones: 47
Medallas recibidas: 2Medallas: Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Razón: Por ayudar mucho a los foreros  Guru de los Gurus: Por solidos y amplios conocimientos - Razón: Por saber demasiado! 
ReputaciónReputación: 13
Rapinto is on a distinguished road Rapinto is on a distinguished road Rapinto is on a distinguished road Rapinto is on a distinguished road Rapinto is on a distinguished road Rapinto is on a distinguished road Rapinto is on a distinguished road
Predeterminado
1 usuarios han marcado este post como "Solución"

Hrmcobol,

Anexo um exemplo para mudar as cores no excel por OLE2
Não percebi bem se é isso que pretendes.
O PPJ é da versão 9.

O código no botão é:
Código COBOL:
  1.  MAIN-00.
  2.     MOVE 3 TO ARRAY-ROW.
  3.     MOVE 1 TO ARRAY-COL.
  4.     INVOKE WORKSHEET "GET-CELLS" USING ARRAY-ROW ARRAY-COL
  5.                           RETURNING CELL.
  6.     MOVE 44 TO COLOR.
  7.     INVOKE CELL "GET-INTERIOR" RETURNING INTERIOR.
  8.     INVOKE INTERIOR "SET-COLORINDEX" USING COLOR.
  9. *
  10.     MOVE 3 TO ARRAY-ROW.
  11.     MOVE 2 TO ARRAY-COL.
  12.     INVOKE WORKSHEET "GET-CELLS" USING ARRAY-ROW ARRAY-COL
  13.                           RETURNING CELL.
  14.     MOVE 42 TO COLOR.
  15.     INVOKE CELL "GET-INTERIOR" RETURNING INTERIOR.
  16.     INVOKE INTERIOR "SET-COLORINDEX" USING COLOR.
  17. *
  18.     MOVE 3 TO ARRAY-ROW.
  19.     MOVE 3 TO ARRAY-COL.
  20.     INVOKE WORKSHEET "GET-CELLS" USING ARRAY-ROW ARRAY-COL
  21.                           RETURNING CELL.
  22.     MOVE POW-COLOR-RED TO COLORRED.
  23.     INVOKE CELL "GET-INTERIOR" RETURNING INTERIOR.
  24.     INVOKE INTERIOR "SET-COLOR" USING COLORRED.

Espero que ajude.
Un saludo,
Rui Pinto
Imágenes Adjuntas
Tipo de Archivo: jpg Excel_Color.jpg (166,8 KB, 25 descargas)
Archivos Adjuntos
Tipo de Archivo: zip EXCEL_COLOR.zip (26,3 KB, 22 descargas)
Rapinto no ha iniciado sesión   Responder Con Cita
Ha dicho Gracias : 1
Hrmcobol ( 3 de agosto de 2016)
  #3
Antiguo 2 de agosto de 2016, 18:36
IDENTIFICATION DIVISION
Rapinto
Gran amigo del Foro y Guru de COBOL
ENVIRONMENT DIVISION
Avatar de Rapinto
DATA DIVISION
Forero desde (Registrado)febrero 2015
Portugal
UbicaciónPorto
Última Actividad29.01.2018 20:23
PROCEDURE DIVISION
PostsPosts: 246
Ha dicho GraciasEnviado: 19
Ha recibido agradecimientosRecibido: 215
Mejores respuestasSoluiones: 47
Medallas recibidas: 2Medallas: Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Razón: Por ayudar mucho a los foreros  Guru de los Gurus: Por solidos y amplios conocimientos - Razón: Por saber demasiado! 
ReputaciónReputación: 13
Rapinto is on a distinguished road Rapinto is on a distinguished road Rapinto is on a distinguished road Rapinto is on a distinguished road Rapinto is on a distinguished road Rapinto is on a distinguished road Rapinto is on a distinguished road
Predeterminado

Hrncobol,

Nas duas primeiras utilizei o "ColorIndex" que são cores do Excel.
Na 3ª célula utilizei o "Color" e enviei o POW-COLOR-RED para cor de fundo.

Já não consegui editar o meu post anterior (5 minutos de limite)

Un saludo,
Rui
Rapinto no ha iniciado sesión   Responder Con Cita
Ha dicho Gracias : 1
Hrmcobol ( 3 de agosto de 2016)
Respuesta


Usuarios activos actualmente viendo este tema: 1 (0 miembros y 1 visitantes)
 
Herramientas

Derechos de Publicación
No puedes publicar nuevos temas
No puedes publicar posts/responder
No puedes adjuntar archivos
No puedes editar tus posts

BB code is habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado



La franja horaria es GMT +1. Ahora son las 00:15.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2019, Jelsoft Enterprises Ltd.