Как изменить минимальное и максимальное значения оси диаграммы с помощью формулы в Excel?

Чтобы изменить минимальное/Максимальное значение значение оси диаграммы с помощью формул в Диаграмма рассеяния Excel, выполните следующие действия:

Шаг 1: Выделите свои исходные данные и добавьте диаграмму рассеяния, щёлкнув по элементу Вставить точечную (X, Y) и пузырьковую диаграмму(или)Точечная) → Точечная диаграмма на вкладке Вставка.

Шаг 2: Найдите диапазон Пустой диапазон рядом с Исходные данные, например E1:G4, и добавьте заголовки, как показано на снимке экрана ниже:

Шаг 3: Определите Минимальное значение и Максимальное значение для оси X и оси Y с помощью формул:

(1) Минимум по оси X: введите в ячейку F2 формулу =ROUNDUP(MAX(A2:A18)+2,0) и нажмите клавишу Enter;
(2) Максимум по оси X: введите в ячейку F3 формулу =ROUNDDOWN(MIN(A2:A18)-1,0) и нажмите клавишу Enter.
(3) Шаг по оси X: введите в ячейку F4 значение 1 или другой необходимый шаг;
(4) Минимум по оси Y: введите в ячейку G2 формулу =ROUNDUP(MAX(B2:B18)+20,0) и нажмите клавишу Enter;
(5) Максимум по оси Y: введите в ячейку G3 формулу =ROUNDDOWN(MIN(B2:B18)-10,0) и нажмите клавишу Enter;
(6) Шаг по оси Y: введите в ячейку G4 значение 10 или другой необходимый шаг.

Примечание: В приведённых выше формулах A2:A18 — это столбец «Цена», на основе которого определяется масштаб оси X, а B2:B18 — столбец «Вес», на основе которого определяется масштаб оси Y. Вы можете настроить максимальное или минимальное значение, изменив числа в указанных формулах в соответствии со своими потребностями.

Шаг 4: Выделите диаграмму рассеяния, щёлкните правой кнопкой мыши по имени текущего листа на панели вкладок и выберите пункт Просмотреть код в контекстном меню.

Шаг 5: В открывшемся окне Microsoft Visual Basic for Applications скопируйте и вставьте следующий код:

VBA: Изменение минимального/Максимальное значение значения оси диаграммы с помощью формул

Sub ScaleAxes()
With Application.ActiveChart.Axes(xlCategory, xlPrimary)
.MinimumScale = ActiveSheet.Range("F3").Value
.MaximumScale = ActiveSheet.Range("F2").Value
.MajorUnit = ActiveSheet.Range("F4").Value
End With
With Application.ActiveChart.Axes(xlValue, xlPrimary)
.MinimumScale = ActiveSheet.Range("G3").Value
.MaximumScale = ActiveSheet.Range("G2").Value
.MajorUnit = ActiveSheet.Range("G4").Value
End With
End Sub

Примечание: F3 — максимальное значение по оси X, F2 — минимальное значение по оси X, F4 — шаг по оси X, G3 — максимальное значение по оси Y, G2 — минимальное значение по оси Y, G4 — шаг по оси Y. Все эти значения можно изменить в соответствии с вашими потребностями.

Шаг 6: Запустите этот макрос VBA, нажав кнопку Выполнить или клавишу F5.

После этого вы увидите, как минимальное и максимальное значения по осям X и Y одновременно изменятся на выбранной диаграмме рассеяния.

Легко выбирайте максимальные/Минимальное значение значения в каждой строке/столбце или Ограниченный диапазон в Excel

Функция Выбрать максимальные/минимальные ячейки в Kutools для Excel позволяет легко находить и выделять наибольшие или наименьшие значения — включая результаты формул, дающих такие значения — в выбранном диапазоне Excel.