Служебной кнопке Excel также можно назначить макрос. При этом она потеряет свое первоначальное предназначение. Для восстановления служебной кнопки сначала удалите ее с панели в режиме настройки, а затем переместите оригинал из соответствующей категории кнопок на требуемую панель инструментов.
Приведем примеры макросов, выполняющих следующие функции:
1 Заполнение ячейки числами, являющимися членами арифметической прогрессии с разностью равной 0,5
2 Назначение встроенного формата диаграмм
3 Вставка значения вместо формул
Пример 9. Макрос “Прогрессия”
В результате работы макроса “Прогрессия” выделенные в строке ячейки заполняются числами, являющимися членами арифметической прогрессии с разностью равной 0,5 или с шагом 0,5.
Для записи макроса “Прогрессия” выполните следующие действия:
· Введите в ячейку A1 число 1000 и выделите ячейки A1:C1.
· Выполните команду Сервис ® Запись макроса ® Начать запись. Появится окно диалога “Запись макроса”.
· Введите в поле ввода Имя макроса название записываемого макроса Прогрессия и нажмите кнопку Параметры. Окно диалога “Запись макроса” расширяется.
· Перейдите на латинский регистр и введите букву p для клавиши быстрого вызова макроса.
· Нажмите кнопку OK в окне диалога “Запись макроса”, которое после этого закроется. Начиная с этого момента, все ваши действия будут записываться в макрос. В строке состояния появится слово “Запись”.
· Установите флажок по строкам. Это означает, что прогрессия будет строится в выделенной строке.
· Установите флажок арифметическая. Это означает, что ячейки в строке будет заполняться числами, являющимися членами арифметической прогрессии.
· В окне “Шаг” введите число 0,5 — разность арифметической прогрессии.
· Нажмите кнопку OK, чтобы выйти из окна диалога “Прогрессия”. Теперь нужно закончить запись макроса.
· Нажмите кнопку Остановить макрос.
Итак, результаты работы макроса “Прогрессия”. Он запускается нажатием Ctrl+p. Перед этим нужно ввести первый член прогрессии и выделить ячейки в строке, где будут размещаться члены арифметической прогрессии с разностью 0,5.
Если первая ячейка среди выделенных не содержит число, то заполнение числами не произойдет и ячейки останутся без изменения.
Пример 10. Макрос “Диаграмма”
Этот макрос будет восстанавливать стандартную диаграмму Excel. Если вы строили графики с использованием пользовательского автоформата диаграмм, то для перехода к стандартной диаграмме Excel вам достаточно будет запустить этот макрос.
Для записи макроса “Диаграмма” выполните следующие действия:
· Выполните команду Сервис ® Запись макроса ® Начать запись. Появится окно диалога “Запись макроса”.
· Введите в поле ввода Имя макроса название записываемого макроса Диаграмма и нажмите кнопку Параметры.
· Перейдите на латинский регистр и введите букву d для клавиши быстрого вызова макроса.
· Нажмите кнопку OK в окне диалога “Запись макроса”. Начиная с этого момента все ваши действия будут записываться в макрос. В строке состояния появится слово “Запись”.
· Из меню Сервис выберите команду Параметры. Появится окно диалога “Параметры”.
· Выберите вкладку “Диаграмма”. В поле ввода списка Формат диаграммы по умолчанию отображается название последнего использовавшегося пользовательского автоформата диаграммы.
· В списке Формат диаграммы по умолчанию с помощью полосы прокрутки найдите значение Встроенная и нажмите кнопку OK.
· Нажмите кнопку Остановить макрос.
До запуска макроса “Диаграмма” в качестве диаграммы по умолчанию строилась диаграмма формата Линии. После нажатия клавиш Ctrl+d в качестве диаграммы по умолчанию будет использоваться Встроенная. Макрос изменяет значение формата для стандартной диаграммы. Обе диаграммы построены на наборе данных A1:E4, но с использованием разных форматов.
Пример 11. Макрос “Значение”
Действие этого макроса аналогично нажатию кнопки Вставить значения. В ячейке остается только результат работы формулы, а сама формула исчезает. Это очень важная функция, поэтому приведем алгоритм записи соответствующих действий в макрос, который впоследствии будет вызываться нажатием Ctrl+v.
Для записи макроса “Значение” выполните следующие действия:
· Для наглядности введите в ячейки A1 и A2 какие-нибудь формулы, например, следующего вида: =COS(D1), =COS(D2). В ячейках D1 и D2 расположены числа.
· Выделите ячейки A1 и A2.
· Выполните команду Сервис → Запись макроса → Начать запись. Появится окно диалога “Запись макроса”.
· Введите в поле ввода Имя макроса название записываемого макроса Значение и нажмите кнопку Параметры.
· Перейдите на латинский регистр и введите букву v для клавиши быстрого вызова макроса.
· Нажмите кнопку OK в окне диалога “Запись макроса”. Начиная с этого момента все ваши действия будут записываться в макрос.
· Выполните команду Правка ® Копировать.
· Нажмите мышью в первую ячейку выделенной области. В нашем случае это ячейка A1.
· Нажмите кнопку OK для выхода из окна диалога “Специальная вставка”.
· Нажмите мышью в первую ячейку выделенной области. В нашем случае это ячейка A1.
· Нажмите клавишу Esc.
· Нажмите кнопку Остановить макрос.
Работа с макросом “Значение” осуществляется следующим образом. Сначала выделите блок ячеек, в которых присутствуют формулы, а затем нажмите Ctrl+v. В выделенных ячейках останутся только значения формул.
Результатом работы формул может быть текст. После нажатия Ctrl+v формулы исчезнут и останется только текст.
Если вы хотите использовать макрос “Значение” вместо команды Специальная вставка, запишите его с относительными ссылками.
[1] Перед удалением ячейки из таблицы проверьте, не содержат ли формулы в других ячейках ссылок на эту ячейку (Ctrl+]).