Создание макросов: упражнения
Упражнение 1. Отображение вкладки «Разработчик» и создание первого макроса
В этом упражнении вы узнаете, как проверить, что вкладка Разработчик отображается, и сможете записать первые макросы.
- На вкладке Файл нажмите кнопку Параметры и в области слева выберите команду Настройка ленты.
- В группе Основные вкладки обязательно установите флажок Разработчик, после чего нажмите кнопку ОК.
- На листе выделите ячейку A1.
- На вкладке Разработчик в группе Код щелкните параметр Использовать относительные ссылки.Важно! Параметр использования относительных ссылок является критически важным, чтобы макросы выполнялись согласно ожиданиям.
- Нажмите кнопку Запись макроса.
- В поле Имя макроса введите FillMonths, а в поле Ctrl+ введите большую букву M, чтобы назначить сочетание клавиш CTRL+SHIFT+M.
- В списке Сохранить в проверьте, выбран ли параметр Эта книга, после чего нажмите кнопку ОК, чтобы начать запись макроса.
- Введите Янв в ячейку A1.
- Выделите ячейку A1, после чего щелкните правой кнопкой мыши и тащите нижний правый угол вправо, пока не достигнете ячейки L1.
- После отображения всплывающей подсказки Дек отпустите кнопку мыши и нажмите кнопку Заполнить ряды.
- Нажмите кнопку Остановить запись, чтобы остановить запись макроса.
- Нажмите клавишу DELETE, чтобы удалить названия месяцев из листа, и выделите ячейку A1.
Упражнение 2. Создание нового макроса в редакторе Visual Basic на основе записанного макроса
В этом упражнении вы будете работать в редакторе Visual Basic, в который нужно скопировать макрос FillMonths для создания второго макроса. Оба макроса нужно будет переименовать, присвоив им уникальные имена. После этого понадобится отредактировать инструкции макроса, чтобы данные заполнялись по вертикали в столбце, а не вдоль строки, а также последовательностью чисел (от 1 до 12) вместо названий месяцев («Янв», «Фев», «Мар» и т. д.).
- На вкладке Разработчик в группе Код нажмите кнопку Макросы.
- В списке Макросы в убедитесь, что выбран пункт Эта книга.
- Выберите макрос FillMonths и нажмите кнопку Правка.Будет запущен редактор Visual Basic, в котором можно редактировать макросы. Макрос находится в окне, которое содержит строки или инструкции либо «код».
- Скопируйте строки, начиная с Sub FillMonths() и заканчивая End Sub.Можно использовать сочетание клавиш CTRL+C или другой метод копирования, которым вы обычно пользуетесь.
- Вставьте скопированный текст в новую строку непосредственно под строкой End Sub.Обратите внимание, что вставляется горизонтальная строка. Эта строка разделяет макросы.
- Измените название первой подпрограммы на Sub FillMonthsR, а второй — на Sub FillMonthsC (необходимо только добавить букву в конце каждого названия).Названия подпрограмм должны выглядеть следующим образом: Sub FillMonthsR() и SubFillMonthsC().
- В строке, которая содержит FormulaR1C1 = «Янв», измените «Янв» на 1 (без кавычек).
- В следующей строке измените оба экземпляра A1:L1 на A1:A12.Таким образом вы измените направление перемещения ячеек, построив последовательность автозаполнения вниз от текущей ячейки, а не вправо.
- Закройте редактор Visual Basic (который сохраняет изменения в макросах), нажав сочетание клавиш ALT+Q.Можно также нажать кнопку Закрыть в правом верхнем углу окна.
- Снова нажмите кнопку Макросы, выберите новый макрос FillMonthsC, после чего нажмите кнопку Выполнить.Обратите внимание на то, что этот макрос заполняет числа от 1 до 12 от ячейки A1 вниз к ячейке A12.
Упражнение 3. Запись и сохранение макроса в личную книгу макросов
В этом упражнении вы будете записывать новый макрос в личную книгу макросов, чтобы потом использовать его с любой книгой на своем компьютере.
- На вкладке Разработчик в группе Код нажмите кнопку Запись макроса.
- В списке Сохранить в выберите пункт Личная книга макросов.
- Введите имя «FillMonthsR» для макроса и большую букву «R» в поле Ctrl+, чтобы назначить сочетание клавиш CTRL+SHIFT+R.
- Чтобы начать запись макроса, нажмите кнопку ОК.
- Выполните шаги, описанные в примере 1 выше, чтобы создать макрос, который заполняет месяцы по горизонтали.Нажмите кнопку Остановить запись после завершения.
Упражнение 4. Назначение кнопки макросу на панели быстрого доступа
В этом упражнении макрос FillMonthsR будет назначен кнопке на панели быстрого доступа.
- Откройте вкладку Файл и выберите команду Параметры.
- В области слева выберите пункт Панель быстрого доступа, после чего в разделе Выбрать команды из нажмите кнопку Макросы.
- Выберите FillMonthsR и нажмите кнопку Добавить >>.
- Нажмите кнопку Изменить и в поле Отображаемое имя измените имя на Заполнение по месяцам (строки).
- Нажмите кнопку ОК, а затем еще раз нажмите ОК в нижней части диалогового окна Параметры Excel, чтобы принять изменения.Кнопка должна появиться на Панели быстрого доступа (в окне заголовка Excel).
- Выделите любую ячейку на листе.
- Нажмите настраиваемую кнопку, и макрос должен вставить месяцы на лист.
- Чтобы удалить эту кнопку, щелкните правой кнопкой мыши ее значок на панели быстрого доступа и выберите пункт Удалить с панели быстрого доступа.
Упражнение 5. Создание настраиваемой группы на вкладке «Разработчик» и назначение макроса кнопке в этой группе
В данном упражнении будет создана настраиваемая группа на вкладке «Разработчик» и назначен макрос FillMonthsC кнопке в этой группе.
- Откройте вкладку Файл и выберите команду Параметры.
- В области слева нажмите кнопку Настройка ленты, после чего в группе Основные вкладки выберите слово Разработчик (не флажок).
- Нажмите кнопку Новая группа. Появится новая группа с названием Новая группа (настраиваемая).
- Выберите новую группу и нажмите кнопку Переименовать.
- В поле Отображаемое имя смените название группы на Мои макросы.
- В разделе Выбрать команды из нажмите кнопку Макросы.
- Выберите FillMonthsR и нажмите кнопку Добавить >> между двух больших полей со списками.
- В группе Основные вкладки щелкните пункт FillMonthsC и нажмите кнопку Переименовать.
- Измените имя на Заполнение по месяцам (столбцы).
- Нажмите кнопку ОК, а затем еще раз нажмите ОК в нижней части диалогового окна Параметры Excel, чтобы принять изменения.Кнопка должна появиться в новой группе Мои макросы на вкладке Разработчик.
- Выделите любую ячейку на листе.
- На вкладке Разработчик в группе Мои макросы нажмите настраиваемую кнопку, и макрос должен вставить месяцы на лист.
- Чтобы удалить кнопку и настраиваемую группу с вкладки «Разработчик», выполните указанные ниже действия.
- Откройте вкладку Файл и выберите пункт Параметры.
- В области слева нажмите кнопку Настройка ленты, после чего в группе Основные вкладки выберите пункт Мои макросы (настраиваемые).
- Щелкните знак + рядом с пунктом Мои макросы (настраиваемые), а затем выберите под ним пункт Заполнить по месяцам.
- Нажмите кнопку << Удалить между двух больших полей со списками.
- Снова нажмите кнопку << Удалить, чтобы удалить группу Мои макросы (настраиваемые).
Тем, кто хочет быстро и эффективно разобраться с макросами Excel - прошу сюда http://macrosvba.ru/wppage/makrosyi-excel-eto-prosto/
ОтветитьУдалить