excel图表中刻度值如何使其最大值、最小值、主要刻度单位

Question

excel图表中刻度值如何使其最大值、最小值、主要刻度单位以及交叉于等设置为单元格数值或公式，使其刻度随单元格的数值或公式的变化而变化，我是要每天新添加数据的，刻度值也将随时更新，等待高手慷慨相助，对您的付出，我在此先谢过了，如果答案符合要求，我还会追加分数的！
非常感谢2楼的代码，可是却运行不了，提示：“ChartObjects”子过程未定义，请老师再次给予帮助，谢谢！另有没有其它解决方案了？请大家还要不吝赐教，在此一并谢过了！

Answer 1

自动改变是excel的默认设置.
如果改过的话,可以双击坐标轴,第二个选项卡里,自动那一列复选框,勾上就行
哦,这个意思啊,那楼下的vba代码可以解决

需要更改表名的,如果不改的话,这样
选中图表之后,执行代码.图表不在选中状态执行出错.
Sub chart()
With ActiveChart.Axes(xlValue)
.MinimumScale = Range("a2")
.MaximumScale = Range("a1")
.MajorUnit = Range("a3")
.CrossesAt = Range("a4")
End With
End Sub

Answer 2

sub chart()
ChartObjects("图表名").Activate
With ActiveChart.Axes(xlValue)
.MinimumScale = range("a2")
.MaximumScale = range("a1")
.MajorUnit = range("a3")
.CrossesAt = range("a4")
End With
end sub