Код VBA, чтобы взять максимум диаграммы и поместить его в ячейку

#excel #vba

Вопрос:

введите описание изображения здесьУ меня есть лист диаграммы, из которого я хочу получить максимальное значение первичной оси и поместить значение в ячейку на другом листе. Я понятия не имею, как с этим справиться

Комментарии:

1. MAX на его источнике данных серии?

2. из изображения, которое я добавил, он возьмет 400 и поместит их в ячейку

Ответ №1:

 Sub t()  Dim c As Chart Set c = ActiveSheet.ChartObjects("Chart 16").Chart  Dim a As Axis Set a = c.Axes(XlAxisType.xlValue)  Debug.Print a.MaximumScale  End Sub  

Комментарии:

1. Спасибо за ответ, как мне это реализовать, чтобы это работало для моего листа диаграммы?