0

![]() |
![]() |
Guardián del Foro |
Hola Camaradas, hay alguna manera de cambiarles el color a una celda y una columna de un gráfico en Excel desde PW?
Saludos
![]() |
![]() |
Gran amigo y Guru de COBOL |
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 é:
COBOL Código:
MAIN-00. MOVE 3 TO ARRAY-ROW. MOVE 1 TO ARRAY-COL. INVOKE WORKSHEET "GET-CELLS" USING ARRAY-ROW ARRAY-COL RETURNING CELL. MOVE 44 TO COLOR. INVOKE CELL "GET-INTERIOR" RETURNING INTERIOR. INVOKE INTERIOR "SET-COLORINDEX" USING COLOR. * MOVE 3 TO ARRAY-ROW. MOVE 2 TO ARRAY-COL. INVOKE WORKSHEET "GET-CELLS" USING ARRAY-ROW ARRAY-COL RETURNING CELL. MOVE 42 TO COLOR. INVOKE CELL "GET-INTERIOR" RETURNING INTERIOR. INVOKE INTERIOR "SET-COLORINDEX" USING COLOR. * MOVE 3 TO ARRAY-ROW. MOVE 3 TO ARRAY-COL. INVOKE WORKSHEET "GET-CELLS" USING ARRAY-ROW ARRAY-COL RETURNING CELL. MOVE POW-COLOR-RED TO COLORRED. INVOKE CELL "GET-INTERIOR" RETURNING INTERIOR. INVOKE INTERIOR "SET-COLOR" USING COLORRED.
Espero que ajude.
Un saludo,
Rui Pinto
![]() |
![]() |
Gran amigo y Guru de COBOL |
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
Actualmente hay 1 usuarios viendo este tema. (0 miembros y 1 visitantes)
Marcadores