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

Шаг 1. Выберите исходные данные и добавьте диаграмму рассеяния, нажав Вставить точечную диаграмму (X, Y) и пузырьковую диаграмму (или Разброс)> Разброс на Вставить меню.

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

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

(1) Максимальное значение по оси X: в ячейке F2 введите формулу = ОКРУГЛВВЕРХ (МАКС. (A2: A18) +2,0), и нажмите Enter ключ;
(2) Минимальное значение по оси X: в ячейке F3 введите формулу = ОКРУГЛ ВНИЗ (МИН (A2: A18) -1,0), и нажмите Enter .
(3) Значение галочки по оси X: в ячейке F4 типа 1 или другое необходимое вам значение тика;
(4) Максимальное значение по оси Y: в ячейке G2 введите формулу = ОКРУГЛ ВВЕРХ (МАКС. (B2: B18) +20,0), и нажмите Enter ключ;
(5) Минимальное значение по оси Y: в ячейке G3 введите формулу = ОКРУГЛ ВНИЗ (МИН (B2: B18) -10,0), и нажмите Enter ключ;
(6) Значение галочки по оси Y: в ячейке G4 типа 10 или другое необходимое вам значение тика.

Внимание: В приведенных выше формулах A2: A18 - это столбец цены, на основе которого вы определяете масштаб оси x, B2: B18 - столбец веса, на основе которого вы определяете масштаб оси y. И вы можете настроить максимальное или минимальное значение, изменив числа в приведенных выше формулах в зависимости от ваших потребностей.

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

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

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, щелкнув Run кнопку или нажав F5 .

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

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

Kutools для Excel Выберите ячейки с максимальным и минимальным значением может помочь вам легко выбрать наибольшие / наименьшие значения или наибольшие / наименьшие значения формулы из выбранного диапазона в Excel.