如何让EXCEL的图表X轴与Y轴的刻度值随数据源自动改变？尤其是一个工作表中有多个图表时如何实现？

Question

我现在在一个EXCEL工作表中有6个图表，我想编辑一个宏，让每个图表的X轴与Y轴的刻度值随数据源自动改变最大值与最小值，能实现吗？

谢谢！！
我刚才试了，把图表设为自动刻度还不行，
我以前做了一个工作表中只有一个图表的宏可以实现自动调整刻度， ActiveSheet.ChartObjects("图表 1").Activate
ActiveChart.Axes(xlValue).Select
With ActiveChart.Axes(xlValue)
.MinimumScale = Range("aj30")
.MaximumScale = Range("aj29")
.MinorUnit = Range("aj32")
.MajorUnit = Range("aj31")
.Crosses = xlAutomatic
.ReversePlotOrder = False
.ScaleType = xlLinear
.DisplayUnit = xlNone
End With
With ActiveChart.Axes(xlCategory)
.MinimumScale = Range("ak30")
.MaximumScale = Range("ak29")
.MinorUnit = Range("ak32")
.MajorUnit = Range("ak31")
.Crosses = xlAutomatic
.ReversePlotOrder = False
.ScaleType = xlLinear
.DisplayUnit = xlNone
但现在一个工作表中有多个图表就不好处

Answer 1

可以实现的
实际上，不用编写宏，可以把图表设置为自动刻度就行。
双击刻度，然后有对话框，把最大值选为自动就行。