Как изменить размер диаграмм на рабочем листе

При создании графиков и диаграмм лучше стремиться к более аккуратному представлению. Например, задать стандартный размер диаграмм. Этот макрос - простой способ изменить размер диаграмм, установив стандартную высоту и ширину для всех диаграмм сразу.

 
Все графики относятся к коллекции ChartObjects. Каждая диаграмма в ChartObjects имеет индексный номер, который можно использовать. Например, ChartObjects(1) указывает на первую диаграмму в листе. 

В этом макросе, мы будем использовать это, перечисляя диаграммы на активном листе с помощью простого счетчика. Каждый раз, когда новый график попадет в фокус макроса, мы меняем его высоту и ширину до размера, который мы определили. 

1. Шаг 1 объявляет переменную (i) для счетчика

2. Шаг 2 начинает выполнение цикла для переменной i - от 1 до максимального количества графиков в коллекции ChartObjects на активном листе. 

3. Шаг 3 Устанавливаем ширину и высоту диаграммы, размер мы устанавливаем в коде. Вы можете изменить эти цифры. 

4. На шаге 4, макрос переходит к следующему элементу цикла. После того, как все графики были оценены, макрос заканчивается. 

Для реализации этого макроса, вы можете скопировать и вставить его в стандартный модуль:

1. Активируйте редактор Visual Basic, нажав ALT + F11. 
2. Щелкните правой кнопкой мыши имя проекта / рабочей книги в окне проекта. 
3. Выберите Insert➜Module. 
4. Введите или вставьте код во вновь созданном модуле.