В сводной диаграмме доступа VBA задается минимальная / максимальная шкала оси Y

Question

Пришел в другую загвоздку, формирующую мою сводную диаграмму через VBA в Access 2010. Я получаю ошибку "Ошибка времени выполнения" 438 ": объект не поддерживает это свойство или метод".

Опять же, я пробовал много разных итераций кода, но не могу найти правильную. Как всегда, заранее благодарю за помощь.

Private Sub Form_Load()

'Call LineMarkerFormat

RONMax = DMax("[Total A/C]", "tblRONChartComparison")
RONMin = DMin("[Total A/C]", "tblRONChartComparison")

With Me.ChartSpace.Charts(0).Axes(1).Scaling
    .MinimumScale = RONMin
    .MaximumScale = RONMax

End With

End Sub

Answer 1

И на следующем сайте, который я проверял, было очень простое решение. Вам больше не нужно масштабирование в конце.minimum/.maximum. Вот мой рабочий код.

Private Sub Form_Load()

'Call LineMarkerFormat

RONMax = DMax("[Total A/C]", "tblRONChartComparison")
RONMin = DMin("[Total A/C]", "tblRONChartComparison")


With Me.ChartSpace.Charts(0).Axes(1).Scaling
    .Minimum = RONMin
    .Maximum = RONMax

End With

End Sub