Tengo una macros para actualizar los valores máximos de los ejes de un gráfico de dispersión que obtiene datos desde una tabla dinámica para ciertos equipos.
Luego, copio y pego el gráfico en otra hoja ("Reporte") y al cambiar el equipo desde la tabla dinámica y actualizar los eje, no me actualiza los ejes en la otra hoja "Reporte".
Favor su ayuda en al macros para que cuando cambie el equipo y actualice sus ejes, también se actualicen los ejes en la otra hoja "Reporte"
Adjunto la macros para los actualizar los ejes.
Public Sub Anim()
ActiveSheet.ChartObjects("Gráfico 3").Select
With ActiveChart
.Axes(xlValue).MinimumScale = 0
.Axes(xlValue).MaximumScale = Range("M8")
.Axes(xlCategory).MinimumScale = 0
.Axes(xlCategory).MaximumScale = Range("M9")
End With
End Sub
de antemano muchas gracias
saludos!!!
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Estimados
Tengo una macros para actualizar los valores máximos de los ejes de un gráfico de dispersión que obtiene datos desde una tabla dinámica para ciertos equipos.
Luego, copio y pego el gráfico en otra hoja ("Reporte") y al cambiar el equipo desde la tabla dinámica y actualizar los eje, no me actualiza los ejes en la otra hoja "Reporte".
Favor su ayuda en al macros para que cuando cambie el equipo y actualice sus ejes, también se actualicen los ejes en la otra hoja "Reporte"
Adjunto la macros para los actualizar los ejes.
Public Sub Anim()
ActiveSheet.ChartObjects("Gráfico 3").Select
With ActiveChart
.Axes(xlValue).MinimumScale = 0
.Axes(xlValue).MaximumScale = Range("M8")
.Axes(xlCategory).MinimumScale = 0
.Axes(xlCategory).MaximumScale = Range("M9")
End With
End Sub
de antemano muchas gracias
saludos!!!