你没明白，比如说图表第一次变化时横轴对应源数据的最大值是180，那此时横轴显示最大值为200，但第二次变化时横轴对应源数据的最大值只有110，则此时横轴显示最大值为120，这是我说的自动调整。两次变化只是举例，不允许使用我给出的两个例子中的特定数字编程

明白了，你说的是图表的动态范围调整，即当图表数据发生变化时，横轴（或其他轴）的刻度范围会自动调整以涵盖新的数据最大值。这种功能通常不是Excel的默认设置，需要通过VBA编程来实现。在这种情况下，你需要创建一个函数来监控数据的变化，并相应地更新图表的坐标轴范围。

下面是一个简化的示例，它使用了Worksheet_Change事件来监听数据更改，并动态更新图表的轴范围：

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim minVal As Long
    Dim maxVal As Long
    
    If Intersect(Target, Me.Columns(1)) Is Nothing Then Exit Sub ' 只关注第一列变化
    
    ' 更新最小值和最大值
    minVal = Application.WorksheetFunction.Min(Target)
    maxVal = Application.WorksheetFunction.Max(Target)
    
    ' 获取图表对象并调整x轴范围
    Dim chartObj As ChartObject
    For Each chartObj In ActiveSheet.ChartObjects
        If chartObj.Chart.HasTitle And chartObj.Chart.Titles(1).HasText("Your Chart Title") Then
            With chartObj.Chart.Axes(xlCategory)
                .MinimumScale = minVal - (minVal * 0.1) ' 添加一点余量
                .MaximumScale = maxVal + (maxVal * 0.1)
            End With
        End If
    Next chartObj
End Sub

这个代码片段会在你工作表的第一列有任何变动时运行，更新图表的X轴范围，使其覆盖最新的数据边界。请注意，这只是一个基本的示例，实际应用可能需要更复杂的条件判断和其他调整。