Переименование макроса. 
Создание макросов

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

Пример 4. Изменение имени макроса Изменим имя макроса «Месяцы» на «Месяцы_с_абсолютными_адресами». Для этого войдите в режим редактирования макроса «Месяцы». Ниже расположен текст программы. Месяцы Макрос Быстрый вызов:

Ctrl+oSub Месяцы () ActiveCell. FormulaR1C1 = «январь"Selection.AutoFill Destination:=ActiveCell.Range («A1:A12»); _Type:=xlFillDefault Active Cell. Range («A1:A12»).SelectEnd Sub.

Первая строка является комментарием. Заменим «Месяцы» на «Месяцы_с_абсолютными_адресами». Соответствующим образом изменим комментарий. В результате получим новый текст программы макроса:'Месяцы_с_абсолютными_адресами Макрос Быстрый вызов: Ctrl+oSub Месяцы_с_абсолютными_адресами () ActiveCell. FormulaR1C1 = «январь"Selection.AutoFill Destination:=ActiveCell.Range («A1:A12»); _Type:=xlFillDefaultActiveCell. Range («A1:A12»).SelectEndSub.

Новое имя автоматически заменит старое в списках макросов. По клавише быстрого вызова будет вызываться макрос с новым именем. Но не все замены происходят автоматически. Если ваш макросу были назначены графические объекты или кнопки, то вам нужно будет самим сделать для них переназначения. Запись в существующий макрос новых действий. Если вы хотите добавить в макрос новые действия, то вам нужно включить соответствующий режим записи макроса. Для этого выполните следующие действия:

Сделайте активным модуль, в котором находится макрос. В тексте программы установите курсор в место ввода новых действий. Выполните команду Сервис | Запись макроса | Отметить позицию. Теперь ваши действия при записи макроса будут записываться в программу с того места, где вы установили курсор. Перейдите в лист рабочей книги, где вы будете записывать новые действия. Выполните команду Сервис | Запись макроса | Записать с отметки. Начиная с этого момента все ваши действия будут записываться в макрос. Выполните все дополнительные действия макроса. Нажмите на кнопку Остановить запись. Рассмотрим конкретный пример добавления новых записей. Полезно сначала выполнить макрос, в который вы собираетесь добавлять новые записи. Тогда вам легче будет ориентироваться, в каком месте таблицы установить указатель перед тем как начать выполнять действия.

Пример 5. Внесение изменений в существующий макрос Внесем изменения в макрос «Заголовок», который был записан в примере 6.2. Изменения будут касаться формата заголовка. Расположим заголовок «Типы компьютеров» в центре строки над названиями типов и введем другой шрифт для заголовка. Приведем текст программы, реализующий макрос «Заголовок» и укажем место расположения курсора строкой с комментарием «`место установки курсора». Заголовок Макрос назначен пункт меню Сервис «ТипЭВМ"Sub Заголовок ()ActiveCell.FormulaR1C1 = «Типкомпьютера"ActiveCell.Offset (1; 0).Range («A1»).SelectActiveCell.FormulaR1C1 = «CP₃₅_SR"ActiveCell.Offset (0;1).Range ("A1»). SelectActiveCell. FormulaR1C1 = «CP₄₀_SR"ActiveCell.Offset (0;1).Range ("A1»). SelectActiveCell. FormulaR1C1 = «CP₅₅_LS"ActiveCell. Offset (0;1). Range («A1»). SelectActive Cell. FormulaR1C1 = «CP₅₅_SX"ActiveCell.Offset (0; - 3) Range («A1:D1»). SelectActiveCell. ActivateSelection. Columns. AutoFi' место установки курсора EndSub.

Для внесения новых записей в макрос «Заголовок» выполните следующие действия:

Удалите комментарий в предпоследней строке программы и поместите там указатель.

Для того чтобы определить позицию, с которой будут записываться новые действия, выполните первые 5 шагов алгоритма внесения изменений в макрос.

Перед тем как выполнить 6 шаг алгоритма внесения изменений в макрос, запустите макрос «Заголовок». Это позволит вам определить положение курсора на рабочем листе, где будут вноситься новые действия.

Выполните 6 шаг алгоритма внесения изменений в макрос. Все последующие действия будут записаны.

Выделите четыре ячейки, включающие заголовок «Тип компьютера».

Вызовите окно диалога «Формат ячейки», нажав Ctrl+1.

Выберите вкладку «Выравнивание», в которой установите флажок Центрировать по выделению. Таким образом мы поместим заголовок в середину строки.

Выберите вкладку «Шрифт», в которой установите стиль Italic и размер шрифта 16. Нажмите кнопку OK, чтобы выйти из режима форматирования ячейки.

Нажмите кнопку Остановить макрос.

Перед последним оператором программы осталась пустая строка. Вы можете удалить ее.

Теперь результат работы макроса «Заголовок» имеет следующий вид: Тип компьютера CP₃₅_SR CP₄₀_SR CP₅₅_LS CP₅₅_SX.

макрос редактирование диаграмма графический.