Cambiar color de fondo en grafico

14/01/2005 - 00:34 por Alfredo Sanchez Deveaux | Informe spam
Se puede cambiar el fondo de un gráfico tomándolo del color de una celda??

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
14/01/2005 - 08:15 | Informe spam
hola, Alfredo !

... cambiar el fondo de un grafico tomandolo del color de una celda



podrias utilizar macros, aunque tendrias que ejecutarla de forma 'manual'
[ya que no existe evento que 'detecte' cambios en los formatos a las celdas]
el siguiente ejemplo supone la existencia de un grafico [# 1] incrustado en la hoja 'activa'
y que deseas aplicarle el color de fondo de la celda 'activa' ->al area de trazado<-
en un modulo de codigo 'normal' ==Sub ColorCeldaAlGrafico()
ActiveSheet.ChartObjects(1).Chart.PlotArea _
.Interior.ColorIndex = ActiveCell.Interior.ColorIndex
End Sub

saludos,
hector.

notas:
-> no tiene porque ser la celda activa [ActiveCell], pudiera ser cualquiera otra [p.ej. Range("c5")
-> hay otros elementos en el grafico ademas del area de trazado [PlotArea]...
p.ej. ChartArea... Legend... SeriesCollection(1)... [etc.]
Respuesta Responder a este mensaje
#2 Alfredo Sanchez Deveaux
14/01/2005 - 19:00 | Informe spam
Muchas gracias Hector, básicamente la idea era cambiar de manera
automatica el color de fondo de un gráfico dependiendo del color de una
celda con formato condicional.
Saludos!!

Héctor Miguel escribió:
hola, Alfredo !


... cambiar el fondo de un grafico tomandolo del color de una celda




podrias utilizar macros, aunque tendrias que ejecutarla de forma 'manual'
[ya que no existe evento que 'detecte' cambios en los formatos a las celdas]
el siguiente ejemplo supone la existencia de un grafico [# 1] incrustado en la hoja 'activa'
y que deseas aplicarle el color de fondo de la celda 'activa' ->al area de trazado<-
en un modulo de codigo 'normal' ==> Sub ColorCeldaAlGrafico()
ActiveSheet.ChartObjects(1).Chart.PlotArea _
.Interior.ColorIndex = ActiveCell.Interior.ColorIndex
End Sub

saludos,
hector.

notas:
-> no tiene porque ser la celda activa [ActiveCell], pudiera ser cualquiera otra [p.ej. Range("c5")
-> hay otros elementos en el grafico ademas del area de trazado [PlotArea]...
p.ej. ChartArea... Legend... SeriesCollection(1)... [etc.]


Respuesta Responder a este mensaje
#3 Héctor Miguel
15/01/2005 - 01:36 | Informe spam
hola, Alfredo !

... cambiar de manera automatica el color de fondo de un grafico
... dependiendo del color de una celda con formato condicional.



para este caso, podrias utilizar 'la misma' condicion que 'modifica' el color de la celda
[obviamente] usando codigo en el modulo de eventos de la hoja donde esta 'esa' celda
-> si es modificada por 'entrada directa' [el usuario hace el 'input']...
usa el evento '_change' y la direccion de 'esa' celda para el 'target'
-> si es como resultado de una formula...
[seguramente] sera mejor aprovechar el evento '_calculate'

¿comentas datos adicionales? como...
cual es la celda, cual es 'la condicion', la celda tiene formula o es dato directo, etc.

saludos,
hector.
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida