Color de una columna de un Gráfico en Excel

[Hrmcobol]

Hola Camaradas, hay alguna manera de cambiarles el color a una celda y una columna de un gráfico en Excel desde PW?
Saludos

[Rapinto]

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 é:
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

[Rapinto]

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