Установка максимальных и минимальных значений для оси X в Excel

У меня есть график с датами на оси X, и я пытаюсь установить максимальные и минимальные значения для этой оси с помощью Excel VBA. Я определил значения MinXAxis и MaxXAxis на одном листе, и вот мой код:

Sub UpdateChartAxes()

   With ActiveSheet.ChartObjects("Chart 1").Chart

      .Axes(xlCategory).MinimumScaleIsAuto = False
      .Axes(xlCategory).MinimumScale = Range("MinXAxis").Value
      .Axes(xlCategory).MaximumScaleIsAuto = False
      .Axes(xlCategory).MaximumScale = Range("MaxXAxis").Value

   End With

End Sub

Когда я запускаю этот код, я получаю ошибку 400 без объяснения ошибки. Есть идеи, что может пойти не так?

Ответы на вопрос(2)

Ваш ответ на вопрос