Сделать шкалы оси X и Y равными на диаграмме Excel

Question

Я бы хотел, чтобы оси X и Y моих диаграмм Excel имели одинаковый масштаб на экране, потому что я рисую географические данные. Квадрат размером 1 км на 1 км должен выглядеть как квадрат, а не прямоугольник, то есть отсутствие сгибания карты в том или ином направлении. В Matlab команда, которая будет делать это, - axis equal.

Как это сделать с помощью VBA?

Я рассматриваю даже более простое решение непосредственно в Excel?

Answer 1

В дополнение к ответу guitarthrower вам необходимо будет сделать следующее: Выберите «Площадь участка» диаграммы, а затем вручную установите высоту и ширину участка графика.

Sheets("Chart1").PlotArea.Select 
    Selection.Height = 500 
    Selection.Width = 500 

Простое задание значений мин и макс. Оси по-прежнему позволяет «хрустить» диаграмме.

Answer 2

Другой метод, подобный Stewbob's, заключается в том, чтобы установить пределы для какого-либо соотношения друг к другу (мои сюжеты в 4 раза шире, чем они высоки), а затем используйте высоту для установки ширины.

ActiveChart.PlotArea.Select 
Selection.Width = Selection.Height * 4 

Answer 3

При выборе площади участка и написать Selection.Width = something, Ширина значение, которое вы настраиваете также включает ширину оси этикетки/текст. Возможно, это не то, что вы хотите.

Вместо этого, вы можете установить значение ВНУТРИ ширина/высота, используя

Selection.InsideHeight = 250 
Selection.InsideWidth = 250