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

2024-12-21 21:47:47
推荐回答(2个)
回答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

回答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