Escalas MAS inteligentes

30/03/2005 - 17:46 por Alex V | Informe spam
Hola a todos, tengo 6 gráficas en una hoja que se mueven
según las opciones que seleccione el usuario, lo que
quiero hacer es que las escalas se ajusten en cada
gráfica del menor valor al maximo valor, ¿como puedo
hacer esto?, ¿como obtengo el valor minimo y maximo de
las series que se están graficando?


intente poner escalas automáticas no siempre funciona


Saludos y gracias de antemano

Alex Villarreal
 

Leer las respuestas

#1 Héctor Miguel
30/03/2005 - 23:39 | Informe spam
hola, Alex !

... 6 graficas en una hoja... quiero... que las escalas se ajusten en cada grafica del menor valor al maximo valor
... ¿como obtengo el valor minimo y maximo de las series que se estan graficando? [...]



suponiendo que para el primer grafico obtienes los minimos/maximos por las funciones 'normles'...
'tendrias que' hacerlo por codigo y... para que sea 'dinamica'... 'manjear' los eventos de la hoja [p.e.]
en el modulo de codigo de 'la hoja' [ya sea en el evento '_calculate' o '_change']
With Me.ChartObjects(1).Chart.Axes(xlValue)
.MinimumScale = Range("e2") ' o las celdas donde obtienes minimos/maximos c/grafico
.MaximumScale = Range("e3")
.MajorUnit = Range("e4")
.MinorUnit = Range("e5")
End With

-> cambia las celdas por las 'reales' y... si se trata de una hoja de graficos 'aparte'...
habria que 'definirle' con exactitud de que hoja y rangos se 'tomaran' los valores
y 'modificar' el 'Me.ChartObjects(1).Chart' por su 'correspondiente' hoja de graficos

saludos,
hector.

Preguntas similares