图表的横坐标轴最小最大值可以根据单元格变动吗？

徐淑颖

图表的横坐标变化.rar (14.21 KB, 下载次数: 11)

2019-5-21 09:43 上传

点击文件名下载附件 我今天再问一次这个问题，麻烦老师指教下！ 我的图表的数据源是变化的，但是横坐标的最大最小值我想根据数据源的最大最小值自定义，数据源变动时候，横坐标最大最小值也跟着变动，不想设置为系统自动的那个样式，请老师指教！就是图片中的红色框里的地方能用公式替代吗？

lisachen

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 4 Then
        ActiveSheet.ChartObjects("图表 1").Activate
        ActiveChart.Axes(xlCategory).MinimumScale = Application.WorksheetFunction.Min([d9:d15])
        ActiveChart.Axes(xlCategory).MaximumScale = Application.WorksheetFunction.Max([d9:d15])
    End If
End Sub

心正意诚身修

这个。最大值最小值。你不改。那么它会自动调整合适的。如果你改过一次。后面你的变发生了变化。它不会自动改变的。

徐淑颖

心正意诚身修 发表于 2019-5-21 11:40
这个。最大值最小值。你不改。那么它会自动调整合适的。如果你改过一次。后面你的变发生了变化。它不会自动 ...

谢谢，这个我是知道的；我就想设置成数据源改变，它就跟着数据源或者根据数据源中最大或者最小值改变，或者根据某个单元格的值改变也是可以的；

lisachen

徐淑颖好，好久不见，试试vba解决吧

徐淑颖

lisachen 发表于 2019-5-21 22:23
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 4 Then
        ActiveSh ...

EN,vba我估计能解决的；谢谢，有空我研究下！上班一忙，就想不起来上网站了，最近准备提高自己，又来学习了，希望这次能坚持下去！