Самоучитель по макрос в excel

На чтение 2 мин Опубликовано 09.11.2015

Возможности Excel не ограничиваются набором встроенных функций. При помощи написания макросов Вы можете создавать собственные функции для выполнения нестандартных задач в Excel.

Например, самостоятельно написанный макрос можно привязать к иконке и вывести на Ленту меню. Либо Вы можете создать пользовательскую функцию (UDF) и использовать ее точно так же, как и остальные встроенные функции Excel.

Макрос — это компьютерный код, написанный для Excel на языке программирования Visual Basic for Applications (VBA). Базовые понятия языка программирования VBA рассматриваются на нашем сайте в Учебнике по VBA. Однако прежде чем приступить к написанию кода VBA, рекомендуем познакомиться с уроками, в которых рассматривается безопасность макросов Excel и редактор Visual Basic.

Содержание

1. Настройка разрешения для использования макросов в Excel
2. Редактор Visual Basic
3. Запись макросов
4. Учебник Excel VBA

Настройка разрешения для использования макросов в Excel

В Excel предусмотрена встроенная защита от вирусов, которые могут проникнуть в компьютер через макросы. Если хотите запустить в книге Excel макрос, убедитесь, что параметры безопасности настроены правильно.

Кликните эту ссылку, чтобы узнать больше о параметрах безопасности макросов в Excel

Редактор Visual Basic

В Excel есть встроенный редактор Visual Basic, который хранит код макроса и взаимодействует с книгой Excel. Редактор Visual Basic выделяет ошибки в синтаксисе языка программирования и предоставляет инструменты отладки для отслеживания работы и обнаружения ошибок в коде, помогая таким образом разработчику при написании кода.

Кликните эту ссылку, чтобы узнать больше о редакторе Visual Basic в Excel

Запись макросов

Инструментарий Excel для записи макросов – это отличный способ эффективно выполнять простые повторяющиеся задачи. Также его можно использовать, как вспомогательное средство при написании более сложных макросов.

Кликните эту ссылку, чтобы узнать больше о записи макросов в Excel

Учебник Excel VBA

Для тех, кто только начинает осваивать язык программирования Excel VBA, предлагаем небольшой вводный курс по Visual Basic for Applications.

Кликните эту ссылку, чтобы перейти к учебнику Excel VBA

Оцените качество статьи. Нам важно ваше мнение:

Иллюстрация: Meery Mary для Skillbox Media

Рассказывает просто о сложных вещах из мира бизнеса и управления. До редактуры — пять лет в банке и три — в оценке имущества. Разбирается в Excel, финансах и корпоративной жизни.

Макрос (или макрокоманда) в Excel — алгоритм действий в программе, который объединён в одну команду. С помощью макроса можно выполнить несколько шагов в Excel, нажав на одну кнопку в меню или на сочетание клавиш.

Обычно макросы используют для автоматизации рутинной работы — вместо того чтобы выполнять десяток повторяющихся действий, пользователь записывает одну команду и затем запускает её, когда нужно совершить эти действия снова.

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

В статье разберёмся:

• как работают макросы и как с их помощью избавиться от рутины в Excel;
• какие способы создания макросов существуют и как подготовиться к их записи;
• как записать и запустить макрос начинающим пользователям — на примере со скриншотами.

---

Общий принцип работы макросов такой:

• Пользователь записывает последовательность действий, которые нужно выполнить в Excel, — о том, как это сделать, поговорим ниже.
• Excel обрабатывает эти действия и создаёт для них одну общую команду. Получается макрос.
• Пользователь запускает этот макрос, когда ему нужно выполнить эту же последовательность действий ещё раз. При записи макроса можно задать комбинацию клавиш или создать новую кнопку на главной панели Excel — если нажать на них, макрос запустится автоматически.

Макросы могут выполнять любые действия, которые в них запишет пользователь. Вот некоторые команды, которые они умеют делать в Excel:

• Автоматизировать повторяющиеся процедуры.

  Например, если пользователю нужно каждый месяц собирать отчёты из нескольких файлов в один, а порядок действий каждый раз один и тот же, можно записать макрос и запускать его ежемесячно.
• Объединять работу нескольких программ Microsoft Office.

  Например, с помощью одного макроса можно создать таблицу в Excel, вставить и сохранить её в документе Word и затем отправить в письме по Outlook.

• Искать ячейки с данными и переносить их в другие файлы.

  Этот макрос пригодится, когда нужно найти информацию в нескольких объёмных документах. Макрос самостоятельно отыщет её и принесёт в заданный файл за несколько секунд.

• Форматировать таблицы и заполнять их текстом.

  Например, если нужно привести несколько таблиц к одному виду и дополнить их новыми данными, можно записать макрос при форматировании первой таблицы и потом применить его ко всем остальным.

• Создавать шаблоны для ввода данных.

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

• Создавать новые функции Excel.

  Если пользователю понадобятся дополнительные функции, которых ещё нет в Excel, он сможет записать их самостоятельно. Все базовые функции Excel — это тоже макросы.

Все перечисленные команды, а также любые другие команды пользователя можно комбинировать друг с другом и на их основе создавать макросы под свои потребности.

В Excel и других программах Microsoft Office макросы создаются в виде кода на языке программирования VBA (Visual Basic for Applications). Этот язык разработан в Microsoft специально для программ компании — он представляет собой упрощённую версию языка Visual Basic. Но это не значит, что для записи макроса нужно уметь кодить.

Есть два способа создания макроса в Excel:

• Написать макрос вручную.

  Это способ для продвинутых пользователей. Предполагается, что они откроют окно Visual Basic в Еxcel и самостоятельно напишут последовательность действий для макроса в виде кода.
• Записать макрос с помощью кнопки меню Excel.

  Способ подойдёт новичкам. В этом варианте Excel запишет программный код вместо пользователя. Нужно нажать кнопку записи и выполнить все действия, которые планируется включить в макрос, и после этого остановить запись — Excel переведёт каждое действие и выдаст алгоритм на языке VBA.

Разберёмся на примере, как создать макрос с помощью второго способа.

Допустим, специальный сервис автосалона выгрузил отчёт по продажам за три месяца первого квартала в формате таблиц Excel. Эти таблицы содержат всю необходимую информацию, но при этом никак не отформатированы: колонки слиплись друг с другом и не видны полностью, шапка таблицы не выделена и сливается с другими строками, часть данных не отображается.

Пользоваться таким отчётом неудобно — нужно сделать его наглядным. Запишем макрос при форматировании таблицы с продажами за январь и затем применим его к двум другим таблицам.

---

Готовимся к записи макроса

Кнопки для работы с макросами в Excel находятся во вкладке «Разработчик». Эта вкладка по умолчанию скрыта, поэтому для начала разблокируем её.

В операционной системе Windows это делается так: переходим во вкладку «Файл» и выбираем пункты «Параметры» → «Настройка ленты». В открывшемся окне в разделе «Основные вкладки» находим пункт «Разработчик», отмечаем его галочкой и нажимаем кнопку «ОК» → в основном меню Excel появляется новая вкладка «Разработчик».

В операционной системе macOS это нужно делать по-другому. В самом верхнем меню нажимаем на вкладку «Excel» и выбираем пункт «Параметры…».

В появившемся окне нажимаем кнопку «Лента и панель».

Затем в правой панели «Настроить ленту» ищем пункт «Разработчик» и отмечаем его галочкой. Нажимаем «Сохранить».

Готово — вкладка «Разработчик» появилась на основной панели Excel.

Чтобы Excel смог сохранить и в дальнейшем использовать макрос, нужно пересохранить документ в формате, который поддерживает макросы. Это делается через команду «Сохранить как» на главной панели. В появившемся меню нужно выбрать формат «Книга Excel с поддержкой макросов».

---

Перед началом записи макроса важно знать об особенностях его работы:

• Макрос записывает все действия пользователя.

  После старта записи макрос начнёт регистрировать все клики мышки и все нажатия клавиш. Поэтому перед записью последовательности лучше хорошо отработать её, чтобы не добавлять лишних действий и не удлинять код. Если требуется записать длинную последовательность задач — лучше разбить её на несколько коротких и записать несколько макросов.

• Работу макроса нельзя отменить.

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

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

Для начала записи макроса перейдём на вкладку «Разработчик» и нажмём кнопку «Записать макрос».

Появляется окно для заполнения параметров макроса. Нужно заполнить поля: «Имя макроса», «Сохранить в», «Сочетание клавиш», «Описание».

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

Первым символом в названии обязательно должна быть буква. Другие символы могут быть буквами или цифрами. Важно не использовать пробелы в названии — их можно заменить символом подчёркивания.

«Сохранить в» — здесь нужно выбрать книгу, в которую макрос сохранится после записи.

Если выбрать параметр «Эта книга», макрос будет доступен при работе только в этом файле Excel. Чтобы макрос был доступен всегда, нужно выбрать параметр «Личная книга макросов» — Excel создаст личную книгу макросов и сохранит новый макрос в неё.

«Сочетание клавиш» — здесь к уже выбранным двум клавишам (Ctrl + Shift в системе Windows и Option + Cmd в системе macOS) нужно добавить третью клавишу. Это должна быть строчная или прописная буква, которую ещё не используют в других быстрых командах компьютера или программы Excel.

В дальнейшем при нажатии этих трёх клавиш записанный макрос будет запускаться автоматически.

«Описание» — необязательное поле, но лучше его заполнять. Например, можно ввести туда последовательность действий, которые планируется записать в этом макросе. Так не придётся вспоминать, какие именно команды выполнит этот макрос, если нужно будет запустить его позже. Плюс будет проще ориентироваться среди других макросов.

В нашем случае с форматированием таблицы заполним поля записи макроса следующим образом и нажмём «ОК».

После этого начнётся запись макроса — в нижнем левом углу окна Excel появится значок записи.

Пока идёт запись, форматируем таблицу с продажами за январь: меняем ширину всех столбцов, данные во всех ячейках располагаем по центру, выделяем шапку таблицы цветом и жирным шрифтом, рисуем границы.

Важно: в нашем случае у таблиц продаж за январь, февраль и март одинаковое количество столбцов, но разное количество строк. Чтобы в случае со второй и третьей таблицей макрос сработал корректно, при форматировании выделим диапазон так, чтобы в него попали не только строки самой таблицы, но и строки ниже неё. Для этого нужно выделить столбцы в строке с их буквенным обозначением A–G, как на рисунке ниже.

Если выбрать диапазон только в рамках первой таблицы, то после запуска макроса в таблице с большим количеством строк она отформатируется только частично.

После всех манипуляций с оформлением таблица примет такой вид:

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

• Нажать на кнопку записи в нижнем левом углу.
• Перейти во вкладку «Разработчик» и нажать кнопку «Остановить запись».

Готово — мы создали макрос для форматирования таблиц в границах столбцов A–G. Теперь его можно применить к другим таблицам.

---

Запускаем макрос

Перейдём в лист со второй таблицей «Февраль_2022». В первоначальном виде она такая же нечитаемая, как и первая таблица до форматирования.

Отформатируем её с помощью записанного макроса. Запустить макрос можно двумя способами:

• Нажать комбинацию клавиш, которую выбрали при заполнении параметров макроса — в нашем случае Option + Cmd + Ф.
• Перейти во вкладку «Разработчик» и нажать кнопку «Макросы».

Появляется окно — там выбираем макрос, который нужно запустить. В нашем случае он один — «Форматирование_таблицы». Под ним отображается описание того, какие действия он включает. Нажимаем «Выполнить».

Готово — вторая таблица с помощью макроса форматируется так же, как и первая.

То же самое можно сделать и на третьем листе для таблицы продаж за март. Более того, этот же макрос можно будет запустить и в следующем квартале, когда сервис автосалона выгрузит таблицы с новыми данными.

Научитесь: Excel + Google Таблицы с нуля до PRO
Узнать больше

Примеры макросов Excel

​Смотрите также​ возможности макроса, если​ отметить галочкой опцию​ удаления пустых строк​ActiveCell.FormulaR1C1 = «11»​

Макрос Excel: пример 1

​ на которые макрос​​OK​​ скрыта, поэтому сначала​ ведется в процентах,​ стандартные возможности «Эксель».​ его вызове каждый​ 3*x1^3 – Cos(x1)​ содержимое одной ячейки​ а также Range.​ As Double) Dim​к объекту​​ i = 1​​Следующие простые примеры макросов​​ будут добавляться /​​ «Разработчик» как показано​ в Excel.​

​Выражение «ActiveCell.FormulaR1C1 = «=R[-3]C+R[-2]C+R[-1]C»»​ будет запускаться. Первой​, чтобы начать запись​ нужно включить ее.​ а в случае​ Так, функция WeekdayName​ раз будет получаться​Cells(i, 1).Value = x1​ и затем записывать​ Например, для обращения​ DataWorkbook As Workbook​Columns​ Then ‘Особый случай​ Excel иллюстрируют некоторые​ удаляться данные на​ ниже на рисунке:​Примеры макросов с​ заменим на «ActiveCell.FormulaR1C1​ клавишей обязательно должна​ макроса.​ Дополнительные сведения см.​ суммарной величины —​ возвращает название (полное​ столбец заданного размера​ (значение x1 записывается​ в другую.​ к ячейке A1​ On Error GoTo​, и показано, как​ для первого элемента​ возможности и приёмы,​ листе Excel или​Теперь нам доступна на​ исходными кодами для​ = «= R[-4]C+R[-3]C+R[-2]C+R[-1]C»».​ быть клавиша Ctrl,​Выполните действия, которые нужно​ в статье Отображение​ (ItogF – ItogP).​ или частичное) дня​ (в данном случае​ в ячейку с​Для этого:​ на конкретном листе​ ErrorHandling ‘Открываем рабочую​ доступ к этому​ последовательности iStep =​ описанные в самоучителе​ список данных будет​

Макрос Excel: пример 2

​ ленте новая закладка​​ удаления, выделения, добавления​​Закрываем редактор, и запускаем​ а вторую клавишу​​ автоматизировать, например ввод​​ вкладки «Разработчик».​Результаты опять же сразу​ недели по его​ состоящий из 10​ координатами (i,1))​открывают вкладку «Вид»;​​ следует указать путь​​ книгу с данными​

​ объекту осуществляется через​ 1 iFib =​ по Excel VBA.​ становиться больше. Относительные​ «Разработчик» со всеми​ и скрытия пустых​ макрос, как и​ пользователь устанавливает самостоятельно.​ стандартного текста или​Запись макроса​ записываются в соответствующие​ номеру. Еще более​ ячеек).​Cells(i, 2).Value = y​переходят на пиктограмму «Макросы»;​ с учетом иерархии.​ Set DataWorkbook =​ объект​ 0 Else ‘Сохраняем​Первоначально эта процедура​ средства не привязывают​ своими инструментами для​ строк в исходной​ в прошлый раз.​ Например, мы, в​ заполнение столбца данных.​   ​ ячейки, поэтому нет​ полезной является Timer.​В повседневной жизни сплошь​ (значение y записывается​жмут на «Запись макроса»;​Что касается понятия «коллекция»,​ Workbooks.Open(«C:Documents and SettingsData»)​Worksheet​ размер следующего приращения​Sub​ курсор к конкретному​ автоматизации работы в​ таблице данных. ​ Как видим, вследствие​ качестве примера, установили​На вкладке​В группе​ необходимости их присваивания​ Он выдает число​ и рядом возникает​ в ячейку с​заполняют открывшуюся форму.​ то это группа​ ‘Присваиваем переменным Val1​. Показано так же,​ перед тем, как​

Макрос Excel: пример 3

​была приведена, как​​ адресу ячейки.​​ Excel и создания​​Макрос для выделения ячеек​​ введенных нами изменений​ клавишу М.​Разработчик​Код​ переменным.​ секунд, которые прошли​ необходимость принять то​ координатами (i,2))​Для простоты в поле​​ объектов того же​​ и Val2 значения​ что при обращении​ перезаписать ‘текущее значение​ пример использования комментариев​По умолчанию в Excel​ макросов.​ со снятой защитой​ была добавлена ещё​Далее, нужно определить, где​в группе​

​на вкладке​Перед запуском созданной программы,​ с полуночи до​ или иное решение​i = i +​ «Имя макроса» оставляют​ класса, которая в​ из заданной рабочей​ к ячейке или​ последовательности iStep =​ в коде VBA.​ включен режим «Абсолют»,​Макросы – это внутренние​ на листе Excel.​ одна ячейка с​ будет храниться макрос.​Код​Разработчик​ требуется сохранить рабочую​ конкретного момента дня.​ в зависимости от​ 1 (действует счетчик);​ «Макрос1», а в​ записи имеет вид​ книги Val1 =​ диапазону ячеек на​ iFib iFib =​ Однако, здесь также​ но вы можете​ приложения, которые берут​Исходный код с​ данными. Она также​ По умолчанию, он​нажмите кнопку​нажмите кнопку​ книгу, например, под​Функции для преобразования числового​ какого-то условия. Не​x1 = x1 +​

Макрос Excel: пример 4

​ поле «Сочетание клавиш»​​ ChartObjects. Ее отдельные​​ Sheets(«Лист1»).Cells(1, 1) Val2​ активном листе, имя​​ iFib_Next End If​​ можно увидеть, как​​ изменить его, включив​​ на себя всю​ примером и описанием​ была включена в​ будет храниться в​​Остановить запись​​Запись макроса​ названием «Отчет1.xls».​ аргумента в разные​ обойтись без них​ shag (аргумент изменяется​ вставляют, например, hh​​ элементы также являются​​ = Sheets(«Лист1»).Cells(1, 2)​​ этого листа при​​ ‘Выводим текущее число​ объявляются переменные, как​ кнопку «Относительные ссылки»​ рутинную работу, облегчая​​ для VBA-макроса выделения​​ расчет общей суммы.​ этой же книге​.​.​Клавишу «Создать отчетную таблицу»​ системы счисления. Например,​ и в VBA​ на величину шага);​

​ (это значит, что​ объектами.​ DataWorkbook.Close Exit Sub​ записи ссылки указывать​ Фибоначчи в столбце​ работают ссылки на​ расположенную ниже под​ жизнь пользователю. Каждый​ ячеек у которых,​В случае, если макрос​ (файле), но при​Более подробное изучение макроса​Если необходимо, заполните поля​ требуется нажать всего​ Oct выдает в​ Excel. Примеры программ,​Loop​ запустить программку можно​Следующее понятие — свойства.​ ErrorHandling: ‘Если файл​ не обязательно.​ A активного рабочего​ ячейки Excel, использование​ кнопкой «Запись макроса»​ пользователь может создать​ снятая защита от​ слишком большой, его​ желании можно установить​   ​Имя макроса​ 1 раз после​ восьмеричное представление числа.​ где дальнейший ход​End Sub.​ будет блиц-командой «Ctrl+h»).​ Они являются необходимой​ не найден, пользователю​’Процедура Sub при​ листа ‘в строке​ цикла​ на панели инструментов​ макрос без знания​ ввода значений данных​

Макрос Excel: пример 5

​ выполнение может занять​ хранение в новой​При редактировании макроса можно​,​ ввода заголовочной информации.​Функции форматирования. Важнейшей из​ выполнения алгоритма выбирается,​В результате запуска данного​ Нажимают Enter.​ характеристикой любого объекта.​ будет предложено поместить​​ помощи цикла считывает​​ с индексом i​For​

​ вкладки «Разработчик»:​ языков программирования. Для​ и редактирования.​ значительное время. Но,​ книге, или в​ немного изучить язык​Сочетание клавиш​ Следует знать и​ них является Format.​ а не предопределен​ макроса в «Эксель»​Теперь, когда уже запущена​ Например, для Range​ искомый файл ‘в​ значения в столбце​ Cells(i, 1).Value =​, условного оператора​Абсолютный отсчет ячеек, всегда​

Макрос Excel: пример 6

​ этого существует макрорекодер,​Макрос для поиска ячеек​​ путем внесения ручного​​ отдельной книге макросов.​​ программирования Visual Basic.​​и​ другие правила. В​ Она возвращает значение​ изначально, чаще всего​ получаем два столбца,​

​ запись макроса, производят​ — это Value​ нужную папку и​ A рабочего листа​ iFib ‘Вычисляем следующее​If​ ведется с исходного​ который запускается с​ в Excel с​ изменения в код,​ Мы оставим значение​Чтобы изменить макрос, на​Описание​ частности, кнопка «Добавить​ типа Variant с​ используют конструкцию If​ в первом из​ копирование содержимого какой-либо​ или Formula.​ после этого продолжить​ Лист2, ‘выполняет с​ число Фибоначчи и​и вывод на​ положения (адрес ячейки​ помощью кнопки «Запись​ выпадающим списком и​ мы можем ускорить​ по умолчанию.​ вкладке​, а затем нажмите​ строку» должна нажиматься​ выражением, отформатированным согласно​ …Then (для сложных​ которых записаны значения​ ячейки в другую.​Методы — это команды,​ выполнение макроса MsgBox​ каждым значением арифметические​

​ увеличиваем индекс позиции​ экран окна сообщения.​
​ А1) – до​
​ макроса».​

​ условным форматированием.​

office-guru.ru

VBA Excel: примеры программ. Макросы в Excel

​ процесс. Добавляем команду​В самом нижнем поле​разработчик​ кнопку​ каждый раз после​ инструкциям, которые заданы​ случаев) If …Then​ для x, а​ Возвращаются на исходную​ показывающие, что требуется​ «Файл Data.xlsx не​ операции и записывает​ элемента на 1​’Процедура Sub выполняет​ адреса курсора с​В этом режиме все​Исходный VBA-код макроса​ «Application.ScreenUpdating = False».​

Что такое VBA

​ настройки макросов можно​нажмите кнопку Макросы​OK​ ввода в таблицу​ в описании формата.​ …END If.​ во втором —​

​ пиктограмму. Нажимают на​ сделать. При написании​ найден! » &​ результат в ‘столбец​ iFib_Next = iFib​ поиск ячейки, содержащей​ вашими данными. Если​ действия пользователя макрорекодер​ для поиска выпадающих​ Она позволит сохранить​ оставить любое подходящее​

​ , выберите имя​, чтобы начать запись​ значений по каждому​и пр.​Рассмотрим конкретный случай. Предположим,​ для y.​ «Запись макроса». Это​ кода в VBA​ _ «Пожалуйста добавьте​ A активного рабочего​ + iStep i​ заданную строку ‘в​ вы сохранили ваш​ в Excel записывает,​ списков на рабочем​ вычислительные мощности, а​ по контексту описание​ макроса и нажмите​ макроса.​ виду деятельности. После​Изучение свойств этих функций​ необходимо создать макрос​

Объекты, коллекции, свойства и методы

​Затем по ним строится​ действие означает завершение​ их необходимо отделять​ рабочую книгу в​ листа (Лист1) Sub​ = i +​ диапазоне ячеек A1:A100​ макрос в книге​ переводя на язык​ листе. Исходный код​ значит ускорить работу.​ данного макроса. Но,​ кнопку​

​Выполните действия, которые нужно​ занесения всех данных​ и их применение​ для «Эксель», чтобы​ график способом, стандартным​ программки.​ от объекта точкой.​ папку C:Documents and​ Transfer_ColA() Dim i​ 1 Loop End​

​ активного листа Sub​ личных макросов (рекомендуется​ программирования VBA-код в​ VBA-макроса для поиска​ Это достигается путем​ это делать не​изменить​ автоматизировать, например ввод​

​ требуется нажать кнопку​ позволит значительно расширить​ в ячейку с​ для «Эксель».​Далее:​ Например, как будет​

​ Settings и нажмите​ As Integer Dim​ Sub​ Find_String(sFindText As String)​ так и делать),​ автоматическом режиме. После​ ячеек с условным​ отказа от обновления​ обязательно.​. Откроется редактор Visual​ стандартного текста или​ «Закончить» и затем​ сферу применения «Эксель».​ координатами (1,1) было​Для реализации циклов в​

​вновь переходят на строку​ показано в дальнейшем,​ OK» Resume End​ Col As Range​

Как начать

​Эта процедура​ Dim i As​ то вы можете​ завершения записи мы​ форматированием.​ экрана во время​

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

• ​ записано:​ VBA Excel 2010,​ «Макросы»;​ очень часто при​ Sub​
• ​ Dim dVal As​
• ​Sub​ Integer ‘Целое число​ использовать свою программу​
• ​ получаем готовую программу,​Макрос для выделения ячеек​

​ выполнения вычислительных действий.​

​ жмем на кнопку​

​Обратите внимание на то,​

​На вкладке​

​ «Эксель».​ более сложных задач.​1, если аргумент положительный;​ как и в​в списке выбирают «Макрос​ программировании в «Эксель»​Урок подготовлен для Вас​ Double ‘Присваиваем переменной​

​просматривает ячейки столбца​ типа Integer, используется​ на других листах​ которая сама выполняет​ Excel по условию​ Чтобы возобновить обновление​ «OK».​ как в нем​Разработчик​Теперь вы знаете, как​ Например:​0, если аргумент нулевой;​ других версиях, наряду​ 1»;​

Макросы в Excel

​ используют команду Cells(1,1).Select.​ командой сайта office-guru.ru​ Col столбец A​A​ в цикле For​ с аналогичными данными.​ те действия, которые​ больше меньше.​ после выполнения макроса,​После этого, все ваши​ выглядят записанные действия.​щелкните​ решать задачи для​Дан бумажный документ отчета​-1, если аргумент отрицательный.​ с уже приведенной​нажимают «Выполнить» (то же​ Она означает, что​Источник: http://www.excelfunctions.net/Excel-Macro-Example.html​ рабочего листа Лист​

Пример 1

​активного листа до​ Dim iRowNumber As​ Независимо от того,​ выполнял пользователь при​2 исходных кода​

​ в его конце​

• ​ действия в данной​
• ​ Возможно, часть кода​
• ​Остановить запись​
• ​ Excel с помощью​

​ фактического уровня издержек​Создание такого макроса для​ конструкцией Do While​ действие запускается начатием​ необходимо выбрать ячейку​Перевел: Антон Андронов​ 2 Set Col​ тех пор, пока​ Integer ‘Целое число​

​ где ваш курсор​ записи.​ макросов для выделения​ пишем команду «Application.ScreenUpdating​ книге (файле) Excel​ будет понятной.​.​ макросов. Умение применять​ предприятия. Требуется:​

​ «Эксель» начинается стандартным​

• ​ используется For.​ сочетания клавиш «Ctrl+hh»).​
• ​ с координатами (1,1)​Автор: Антон Андронов​
• ​ = Sheets(«Лист2»).Columns(«A») i​ не встретит пустую​ типа Integer для​

​ позиционируется, когда вы​Как записать готовый макрос​ ячеек по условию​ = True»​

​ будут записываться в​Измените код, закройте редактор​Более подробное изучение макроса​ vba excel (примеры​разработать его шаблонную часть​ способом, через использование​Рассмотрим программу, которая создаст​В результате происходит действие,​ т.е. A1.​Немногие знают, что первая​ = 1 ‘При​ ячейку. Значения записываются​

​ хранения результата iRowNumber​ начинаете запись макроса!​ в Excel? Очень​ больше равно или​Добавим также команду «Application.Calculation​ макрос до тех​ Visual Basic и​   ​ программ см. выше)​ посредством табличного процессора​ «горячих» клавиш Alt​ столбец. В каждой​

​ которое было осуществлено​Вместе с ней нередко​ версия популярного продукта​ помощи цикла считываем​ в массив. Этот​ = 0 ‘Просматривает​ Даже если он​

Пример 2

​ просто:​ меньше равно относительно​ = xlCalculationManual» вначале​

​ пор, пока вы​ запустите макрос повторно.​При редактировании макроса можно​ может понадобиться и​ «Эксель»;​ и F11. Далее​ его ячейке будут​ в процессе записи​ используется Selection.ClearContents. Ее​ Microsoft Excel появилась​

​ значения ячеек столбца​ простой макрос Excel​ одну за другой​ уже находится в​На вкладке «Разработчик» нажимаем​ их числовых значений.​ кода, а в​ сами не остановите​ Посмотрите, что произойдет.​

​ немного изучить язык​ для работы в​составить программу VBA, которая​ записывается следующий код:​ записаны квадраты номера​ макроса.​ выполнение означает очистку​

​ в 1985 году.​

​ Col до тех​

​ показывает работу с​

​ ячейки A1:A100 до​

​ ячейке A1, ваш​

​ кнопку «Запись макроса».​Макрос для выборочного выделения​ конце кода дописываем​ запись.​Узнайте о том, как​

​ программирования Visual Basic.​ среде самого популярного​

​ будет запрашивать исходные​Sub program()​ соответствующей строки. Использование​Имеет смысл увидеть, как​

​ содержимого выбранной ячейки.​ С тех пор​ пор, ‘пока не​ динамическими массивами, а​

​ тех пор, пока​ первый макрос лучше​

​В появившимся диалоговом окне​ ячеек на листе​ «Application.Calculation = xlCalculationAutomatic».​

​Для примера, запишем простейшее​

​ создавать и запускать​

​Чтобы изменить макрос, в​ на данный момент​ данные для ее​x= Cells(1, 1).Value (эта​ конструкции For позволит​ выглядит код. Для​Прежде всего требуется создать​ он пережил несколько​

​ встретится пустая ячейка​ также использование цикла​ не будет найдена​

Пример 3

​ записывать после нажатия​ заполняем параметры макроса.​ Excel.​ Этим мы вначале​ арифметическое действие: сложение​ макросы. Дополнительные сведения​ группе​

​ текстового редактора «Ворд».​ заполнения, осуществлять необходимые​ команда присваивает x​ записать ее очень​ этого вновь переходят​ файл и сохранить​ модификаций и востребован​ Do Until IsEmpty(Col.Cells(i))​Do Until​

​ строка sFindText For​ клавиш должны быть​ И нажимаем «ОК».​Исходный код макроса​ макроса отключаем автоматический​ содержимого трёх ячеек​ см. в статье​Код​

​ В частности, можно​ расчеты и заполнять​

​ значение содержимого ячейки​ коротко, без использования​ на строку «Макросы»​ его, присвоив имя​ у миллионов пользователей​

​ ‘Выполняем арифметические операции​. В данном примере​ i = 1​ Ctrl + Home.​После завершения нажимаем на​ для автоматического выделения​

​ пересчет результата после​ (=C4+C5+C6).​ Создание, выполнение, изменение​

​на вкладке​ путем записи, как​ ими соответствующие ячейки​ с координатами (1,​ счетчика.​ и нажимают «Изменить»​ и выбрав тип​

​ по всему миру.​ над значением текущей​ мы не будет​ To 100 If​Пример: Представьте себе, что​ кнопку «Остановить запись»,​ отдельных ячеек по​ каждого изменения ячеек,​После этого, жмем на​ и удаление макроса.​Разработчик​

​ показано в самом​ шаблона.​

​ 1))​

​Сначала нужно создать макрос,​ или «Войти». В​ «Книга Excel с​ При этом многие​ ячейки dVal =​ совершать какие-либо действия​

​ Cells(i, 1).Value =​ каждый месяц вы​ после чего макрос​ заданному условию в​ а в конце​

​ кнопку «Остановить запись».​Макросы программы Microsoft Excel​нажмите кнопку​ начале статьи, или​

​Рассмотрим один из вариантов​

​If x>0 Then Cells(1,​ как описано выше.​ результате оказываются в​ поддержкой макросов».​ работают лишь с​ Col.Cells(i).Value * 3​ с массивом, хотя​ sFindText Then ‘Если​ получаете десятки таблиц​ будет автоматически сохранен.​ критериях поиска значений.​

Пример 4

​ макроса – включаем.​ Эта кнопка преобразовалась​ позволяют значительно ускорить​Макросы​ через написание кода​ решения.​ 1).Value = 1​ Далее записываем сам​ среде VBA. Собственно,​Затем необходимо перейти в​ малой толикой возможностей​ — 1 ‘Следующая​ в реальной практике​ совпадение с заданной​ из всех филиалов.​Для выполнения или редактирования​ Как быстро выделять​

​ Таким образом, Excel​ из кнопки «Запись​ работу с документами​, выделите имя макроса​ создавать кнопки меню,​Все действия осуществляются на​

​If x=0 Then Cells(1,​

​ код. Считаем, что​

​ сам код макроса​

​ приложение VB, для​ этого табличного процессора​ команда записывает полученный​ программирования после того,​ строкой найдено ‘сохраняем​ От вас требуется​

​ записанного макроса нажимаем​

​ несмежные диапазоны макросом?​ подсчитает результат только​ макроса», после включения​ в этом табличном​ и нажмите кнопку​

​ благодаря которым многие​ стандартном листе в​

​ 1).Value = 0​ нас интересуют значения​

​ находится между строками​

​ чего достаточно воспользоваться​

​ и даже не​ результат в столбец​ как данные записаны​ номер текущей строки​

Функции VBA

​ организовать данные и​ на кнопку «Макросы»​Макрос для добавления строк​ один раз, а​ записи.​ редакторе. Это достигается​Изменить​ операции над текстом​ Excel. Резервируются свободные​If x​ для 10 ячеек.​ Sub Макрос1() и​ комбинацией клавиш «Alt»​ догадываются, как им​ A активного рабочего​ в массив, над​

• ​ и выходим из​ рассчитать показатели, чтобы​ (или комбинацию клавиш​ с заданной высотой​ не будет его​
• ​Для того, чтобы проверить,​ путем автоматизации повторяющихся​. Запустится редактор Visual​ можно будет осуществлять​ ячейки для внесения​End Sub.​ Код выглядит следующим​
• ​ End Sub.​ и «F11». Далее:​ могло бы облегчить​
• ​ листа ‘Имя листа​ ними такие действия,​ цикла For iRowNumber​ произвести еще один​ ALT+F8). Появится окно​ в таблицу Excel.​ постоянно пересчитывать, чем​ как работает записанный​ действий, записанных в​ Basic.​ нажатием дежурных клавиш​ данных по месяцу,​Остается запустить макрос и​ образом.​Если копирование было выполнено,​в строке меню, расположенном​ жизнь умение программирования​
• ​ в ссылке указывать​ как правило, совершаются.​ = i Exit​ ежемесячный отчет. Вы​ со списком записанных​
• ​Пошаговое руководство по​ сэкономит время.​ макрос, кликаем в​ специальный код. Давайте​Обратите внимание на то,​ или через вкладку​ году, названию компании-потребителя,​ получить в «Эксель»​For i = 1​ например, из ячейки​ в верхней части​ в Excel.​ нет необходимости, так​
• ​’Процедура Sub сохраняет​ For End If​ можете записать макрос​ макросов и кнопками​ написанию кода макроса​
• ​Продвинутые пользователи могут выполнять​ том же блоке​ разберем, как создать​ как в нем​ «Вид» и пиктограмму​ сумме издержек, их​ нужное значение для​
• ​ to 10 Next​

​ А1 в ячейку​ окна, нажимают на​Программирование в Excel осуществляется​ как это активный​

Пример 5

​ значения ячеек столбца​ Next i ‘Сообщаем​ для выполнения всех​

​ для управления ими.​ VBA для умной​ не только редактирование​

• ​ инструментов «Код» по​ макросы в программе​ выглядят записанные действия.​
• ​ «Макросы».​ уровня, товарооборота. Так​ аргумента.​Команда переводится на «человеческий»​ C1, то одна​ иконку рядом с​ посредством языка программирования​

​ лист. Cells(i, 1)​ A активного листа​

Создание шаблона

​ пользователю во всплывающем​ этих функций, в​С помощью макропрограмм можно​ вставки пустых строк​ и оптимизацию записанных​ кнопке «Макросы», или​ Excel, и как​ Возможно, часть кода​Автор: Наира​ как количество компаний​Как вы уже могли​ язык, как «Повторять​ из строк кода​ иконкой Excel;​ Visual Basic for​ = dVal i​ в массиве Sub​ окне найдена ли​

Переменные

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

• ​ их можно отредактировать.​ будет понятной.​
• ​Примечание:​ (обществ), относительно которых​ заметить, программировать в​
• ​ от 1 до​ будет выглядеть, как​выбирают команду Mudule;​
• ​ Application, который изначально​ = i +​ GetCellValues() Dim iRow​

​ искомая строка ‘Если​ и соединение всех​ пользователя в десятки​ Как автоматически вставить​ записывать код макросов​ Alt+F8.​Скачать последнюю версию​Измените код, закройте редактор​

Решение задачи с использованием программирования на VBA

​ Мы стараемся как можно​ составляется отчет, не​ самом известном табличном​ 10 с шагом​ Range(“C1”).Select. В переводе​сохраняют, нажав на иконку​ встроен в самый​ 1 Loop End​ As Integer ‘Хранит​

​ заданная строка найдена,​ листов в одну​ раз. Но чтобы​ строки через одну​

​ с нуля. Для​После этого, открывается окно​ Excel​ Visual Basic и​ оперативнее обеспечивать вас​

​ зафиксировано, ячейки для​ процессоре Microsoft не​ один».​ это выглядит, как​ с изображением floppy​ известный табличный процессор​ Sub​ номер текущей строки​

​ указываем в какой​ комбинированную таблицу.​ использовать запись пользовательских​ ячейку?​ того, чтобы приступить​

​ со списком записанных​Макрос можно записать двумя​ запустите макрос повторно.​ актуальными справочными материалами​

​ внесения значений по​ так уж сложно.​Если ставится задача получить​ «Диапазон(“C1”).Выделить», иными словами​ disk;​ от Microsoft.​Данный макрос показывает пример​ Dim dCellValues() As​ ячейке найдено совпадение​Используйте кнопки со стрелками​ макросов на все​Как сделать границы ячеек​ к этому, нужно​ макросов. Ищем макрос,​ способами:​ Посмотрите, что произойдет.​ на вашем языке.​

​ итогам и ФИО​ Особенно, если научиться​ столбец с квадратами,​ осуществляет переход в​пишут, скажем так, набросок​К его достоинствам специалисты​ кода VBA, отслеживающего​ Double ‘Массив для​ If iRowNumber =​ для управления курсором​ 100% следует соблюдать​ макросом в таблице​ нажать на кнопку​ который мы записали,​автоматически;​Дополнительные сведения о создании​ Эта страница переведена​ специалиста заранее не​ применять функции VBA.​ например, всех нечетных​ VBA Excel, в​ кода.​ относят сравнительную легкость​ событие Excel. Событие,​

​ хранения значений ячеек​

fb.ru

Краткое руководство: создание макроса

​ 0 Then MsgBox​​ (Ctrl + Up,​ простые правила, которые​ Excel.​ «Visual Basic», которая​ выделяем его, и​вручную.​ макросов см. в​ автоматически, поэтому ее​ резервируют. Рабочему листу​ Всего в этом​ чисел из диапазона​ ячейку С1.​Он выглядит следующим образом:​ освоения. Как показывает​ к которому привязан​ iRow = 1​ «Строка » &​ и т.п.). Позиционируйте​ существенно влияют на​Как автоматически рисовать​

​ расположена в самом​ жмем на кнопку​Воспользовавшись первым вариантом, вы​ статье Создание и​ текст может содержать​ присваивается новое название.​ языке программирования, созданном​ от 1 до​Активную часть кода завершает​Sub program ()​ практика, азами VBA​ макрос, происходит каждый​ ReDim dCellValues(1 To​ sFindText & «​ курсор, так чтобы​

​ их качество в​ границы в таблицах​ начале ленты разработчика.​ «Выполнить».​ просто записываете определенные​ удаление макросов.​ неточности и грамматические​ Например, «Օтчет».​ специально для написания​ 11, то пишем:​ команда ActiveSheet.Paste. Она​’Наш код​

​ могут овладеть даже​

Процедура

​ раз при выделении​​ 10) ‘Цикл Do​ ​ не найдена» Else​ вы могли добавить,​​ момент записи и​​ с помощью макроса?​После этого, открывается знакомое​Можно поступить ещё проще,​ действия в программе​Сведения о запуске макросов​ ошибки. Для нас​

​Для написания программы автоматического​​ приложений в «Эксель»​ ​For i = 1​​ означает запись содержания​​End Sub​​ пользователи, которые не​​ ячейки или диапазона​​ Until перебирает последовательно​​ MsgBox «Строка «​ ​ изменить или удалить​​ эффективность при выполнении.​​ Автоматизированное форматирование границ​​ нам окно редактора​​ и не вызывать​​ Microsoft Excel, которые​​ см. в статье​ важно, чтобы эта​​ заполнения шаблона, необходимо​​ и Word, около​ to 10 step​ ​ выделенной ячейки (в​Обратите внимание, что строка​ имеют навыков профессионального​ ячеек на рабочем​ ​ ячейки столбца A​​ & sFindText &​​ данные внутри таблицы​​​​ ячеек по разным​

​ VBE.​​ даже окно выбора​ ​ выполняете в данный​ Запуск макроса.​ статья была вам​ ​ выбрать обозначения. Они​ 160 функций. Их​​ 1 Next.​​ данном случае А1)​​ «’Наш код» будет​​ программирования. К особенностям​​ листе. В нашем​​ активного листа ‘и​ » найдена в​​ по мере необходимости.​​5 простых советов, которые​ цветам, стилям и​ ​Программист пишет там код​ макросов. Мы же​ момент времени. Потом,​Действия перед записью макроса​ полезна. Просим вас​ ​ будут использоваться для​ можно разделить на​Здесь step — шаг.​ в выделенную ячейку​

Дальнейшие действия

• ​ выделена другим цветом​ VBA относится выполнение​ случае при выделении​ извлекает их значения​

• ​ ячейке A» &​Использование мыши для навигации​ помогут в создании​

Процедура

​ толщине линий используя​​ макроса вручную.​ ​ помним, что записали​ можно будет воспроизвести​   ​​ уделить пару секунд​​ переменных:​​ несколько больших групп.​​ В данном случае​ С1.​ (зеленым). Причина в​ ​ скрипта в среде​​ ячейки​​ в массив до​​ iRowNumber End If​​ является более сложным​​ макросов без программирования.​​ макрос.​ ​Как видим, макросы в​​ сочетание «горячих клавиш»​​ эту запись. Данный​​Убедитесь в том, что​​ и сообщить, помогла​​NN– номер текущей строки​​ Это:​ он равен двум.​​Циклы VBA помогают создавать​​ апострофе, поставленном в​

​ офисных приложений.​​B1​ ​ тех пор, пока​​ End Sub​​ и не так​​ Воспользуйтесь этими простыми​​Макрос для объединения повторяющихся​ ​ Microsoft Excel могут​​ для быстрого вызова​​ способ очень легкий,​​ на ленте отображается​​ ли она вам,​​ таблицы;​​Математические функции. Применив их​ По умолчанию отсутствие​​ различные макросы в​​ начале строки, который​Недостатком программы являются проблемы,​ ​, на экран выводится​ не встретится пустая​Следующая процедура​ надежным в момент​ ​ советами, которые позволяют​​ ячеек в таблице​​ значительно ускорить выполнение​​ макроса. В нашем​​ и не требует​​ вкладка​​ с помощью кнопок​

​TP и TF –​​ к аргументу, получают​ ​ этого слова в​ Excel.​ обозначает, что далее​ ​ связанные с совместимостью​ окно с сообщением.​​ ячейка Do Until​​Sub​ записи. Когда дело​ быстро и просто​ Excel.​​ рутинных и однообразных​​ случае, это Ctrl+М.​ знания кода, но​ ​Разработчик​ внизу страницы. Для​ планируемый и фактический​ значение косинуса, натурального​ цикле означает, что​ ​Циклы VBA помогают создавать​ следует комментарий.​ различных версий. Они​’Данный код показывает​

Дальнейшие действия

​ IsEmpty(Cells(iRow, 1)) ‘Проверяем,​– пример использования​ доходит до макросов,​ создавать качественные макропрограммы​Практический пример и​ процессов. Но, в​

support.office.com

Создание макросов в программе Microsoft Excel

​ Набираем данную комбинацию​ применение его на​. По умолчанию вкладка​ удобства также приводим​ товарооборот;​ логарифма, целой части​ шаг единичный.​ различные макросы. Предположим,​Теперь вы можете написать​ обусловлены тем, что​ окно с сообщением,​ что массив dCellValues​

​ цикла​ использовать мышь лучше​

Способы записи макросов

​ автоматически:​ пошаговый разбор исходного​

• ​ большинстве случаев, для​
• ​ на клавиатуре, после​

​ практике довольно ограничено.​Разработчик​ ссылку на оригинал​SF и SP –​ и пр.​Полученные результаты нужно сохранять​ что имеется функция​ любой код и​ код программы VBA​ если на текущем​ имеет достаточный размер​Do While​ только для вызова​

​Присваивайте макросам короткие, но​ VBA-кода макроса для​ этого больше подходят​ чего макрос запускается.​Ручная запись макросов, наоборот,​не видна, поэтому​ (на английском языке).​ фактическая и планируемая​

Автоматическая запись макросов

​Финансовые функции. Благодаря их​ в ячейки с​ y=x + x2​ создать для себя​

​ обращается к функциональным​ рабочем листе ‘выбрана​ ‘Если нет –​. Здесь также можно​ меню.​ содержательные имена. Когда​

​ автоматического объединения повторяющихся​ макросы, код которых​Как видим, макрос выполнил​ требует знаний программирования,​ необходимо выполнить указанные​Для автоматизации часто выполняемых​ сумма издержек;​ наличию и используя​ номером (i,1). Тогда​ + 3×3 –​ новый инструмент в​ возможностям, которые присутствуют​ ячейка B1 Private​ увеличиваем размер массива​

​ увидеть, как объявляются​Держите ваши макросы для​ вы войдете вкус,​ одинаковых ячеек в​ написан вручную, а​ в точности все​ так как код​ ниже действия.​ в Microsoft Excel​IP и IF –​ программирование в Excel,​ при каждом запуске​

​ cos(x). Требуется создать​ VBA Excel (примеры​ в новой версии​ Sub Worksheet_SelectionChange(ByVal Target​ на 10 при​ переменные, работу со​ небольших специфичных задач.​ со временем вам​ строках таблицы. 1​ не автоматически записанные​ те действия, которые​ набирается вручную с​

​Выберите​ задач можно записать​ планируемый и фактически​ можно получать эффективные​ цикла с увеличением​ макрос для получения​ программ см. далее).​

​ продукта, но отсутствуют​ As Range) ‘Проверяем​ помощи ReDim If​

​ ссылками на ячейки​ Чем больше программный​ придется создавать много​ 2 3 4​ действия. Кроме того,​ были записаны ранее.​ клавиатуры. Но, грамотно​Excel​

​ макрос. Макрос представляет​ уровень издержек.​ инструменты для ведения​ i на величину​

​ ее графика. Сделать​ Конечно, тем, кто​ в старой. Также​ выбрана ли ячейка​ UBound(dCellValues) < iRow​ Excel и применение​

Запуск макроса

​ код в макросе,​ макросов. При выборе​Макросы позволяют существенно расширить​ код макроса можно​Для того, чтобы отредактировать​ написанный таким образом​>​ собой действие (или​

​Обозначим теми же буквами,​ бухгалтерского учета и​ шага автоматически будет​ это можно только,​ знаком с азами​ к минусам относят​ B1 If Target.Count​

​ Then ReDim Preserve​ условного оператора​ тем медленнее он​ в диалоговом окне​ возможности в программе​ оптимизировать через редактор​ макрос, снова жмем​ код, может значительно​Параметры​ набор действий), которое​ но с «приставкой»​ осуществления финансовых расчетов.​

​ расти и номер​ используя циклы VBA.​ Visual Basic, будет​ и чрезмерно высокую​

Редактирование макроса

​ = 1 And​ dCellValues(1 To iRow​If​ работает, особенно если​ их легче найти​ Excel. Они автоматизируют​ VBE для ускорения​

​ на кнопку «Макросы».​ ускорить выполнение процессов.​>​ можно выполнять любое​

​ Itog накопление итога​Функции обработки массивов. К​ у строки. Таким​За начальное и конечное​ намного проще. Однако​ открытость кода для​ Target.Row = 1​ + 9) End​.​ это требуется для​ с короткими и​ рабочие процессы и​ процесса выполнения задачи.​ В открывшемся окне​Прежде, чем начать автоматическую​

​Лента и панель​ количество раз. При​ по данному столбцу.​

​ ним относятся Array,​
​ образом, произойдет оптимизация​

​ значение аргумента функции​ даже те, кто​ изменения посторонним лицом.​

​ And Target.Column =​ If ‘Сохраняем значение​’Процедура Sub выводит​ выполнения многих функций​ содержательными названиями. Система​ берут большую часть​Автор: Максим Тютюшев​ выбираем нужный макрос,​ запись макросов, нужно​.​

​ создании макроса записываются​ Например, ItogTP –​ IsArray; LBound; UBound.​ кода.​ берут x1=0 и​ их не имеет,​ Тем не менее​ 2 Then ‘Если​ текущей ячейки в​ числа Фибоначчи, не​ или рассчитать много​ VBA предоставляет вам​ рутинной работы пользователя​VBA коды для​ и кликаем по​ включить макросы в​В категории​ щелчки мышью и​ касается столбца таблицы,​Функции VBA Excel для​В целом код будет​

​ x2=10. Кроме того,​ при желании смогут​ Microsoft Office, а​ ячейка B1 выбрана,​ массиве dCellValues dCellValues(iRow)​ превышающие 1000 Sub​ формул в большой​ возможность указать описание​ на себя. Просто​ простых программ макросов​ кнопке «Изменить».​ программе Microsoft Excel.​Настроить ленту​ нажатия клавиш. После​ озаглавленного, как «планируемый​ строки. Это достаточно​ выглядеть, как:​

Написание кода макроса с нуля

​ необходимо ввести константу​ освоиться достаточно быстро.​ также IBM Lotus​ выполняем необходимое действие​ = Cells(iRow, 1).Value​ Fibonacci() Dim i​ электронной таблице.​ к имени. Обязательно​ нужно научится пользоваться​ необходимых при работе​Открывается Microsoft Visual Basic​Далее, переходим во вкладку​

​в списке​ создания макроса его​ товарооборот».​

​ многочисленная группа. В​Sub program()​

​ — значение для​За таким названием скрываются​ Symphony позволяют пользователю​ MsgBox «Вы выбрали​ iRow = iRow​ As Integer ‘Счётчик​Если вы запустите каждый​ используйте ее.​ макросами и производительность​ с таблицами на​ (VBE) – среда,​ «Разработчик». Кликаем по​Основные вкладки​ можно отредактировать, чтобы​Используя введенные обозначения, получаем​

​ нее входят, например,​

lumpics.ru

Запуск и создание макросов в Excel для чайников

​For i = 1​ шага изменения аргумента​ программы, написанные на​ применять шифрование начального​ ячейку B1″ End​

Создание и выполнение макросов

​ + 1 Loop​ для обозначения позиции​ процесс отдельно, вы​
​Имя макроса обязательно должно​ труда возрастет в​ каждый день.​ где происходит редактирование​ кнопке «Запись макроса»,​​установите флажок​ изменить выполняемые им​ формулы для отклонений.​
​ функции Space для​ To 10 Step​ и начальное значение​ языке Visual Basic​ кода и установку​ If End Sub​ End Sub​ элемента в последовательности​​ можете быстро просмотреть​ начинаться с букв​ десятки раз!​
​Макрос для копирования листа​ макросов.​ которая расположена на​Разработчик​ действия.​ Если требуется осуществить​​ создания строки с​ 1 (можно записать​ для счетчика.​
​ for Application. Таким​ пароля для его​На примере этой процедуры​В этом примере процедура​ Dim iFib As​ результаты для проверки​ и не может​​Вам даже не нужно​ в Excel c​Запись каждого макроса начинается​ ленте в блоке​
​, а затем нажмите​Допустим, что необходимо каждый​ расчет в %​ числом пробелов, равных​ просто For i​Все примеры макросов VBA​ образом, программирование в​​ просмотра.​ показано использование операторов​Sub​
​ Integer ‘Хранит текущее​ точности их выполнения.​ содержать пробелы, символы​ быть программистом и​ любым количеством копий.​ с команды Sub,​​ инструментов «Код».​ кнопку​ месяц создавать отчет​
​ имеем (F –​ целочисленному аргументу, или​ = 1 To​ Excel создаются по​ Excel — это​Именно с этими понятиями​On Error​​считывает значения из​ значение последовательности Dim​Если нельзя разбить длинный​
​ или знаки препинания.​ знать язык программирования​Практический пример с​ а заканчивается командой​Открывается окно настройки записи​Сохранить​ для главного бухгалтера.​ P) / P​​ Asc для перевода​ 10)​ той же процедуре,​
​ создание макросов с​ нужно разобраться тем,​и​ столбца​ iFib_Next As Integer​ макрос на короткие​ После первого символа,​ «VBA» чтобы создавать​​ описанием и исходным​ End Sub. Сразу​ макроса. Тут можно​
​.​ Требуется выделить красным​ * 100, а​ символов в код​Cells(i, 1).Value = i​ которая представлена выше.​ нужным кодом. Благодаря​

exceltable.com

Как работать с макросами в Excel 2010 без программирования кода

​ кто собирается работать​Resume​A​ ‘Хранит следующее значение​ приложения, а требуется​ вы можете использовать​ свои макро-программы с​ кодом макроса для​ же после команды​ указать любое имя​Запись макроса​

​ цветом и полужирным​ в сумме —​ ANSI. Все они​ ^ 2 (т.е.​ В данном конкретном​ этой возможности табличный​ в среде VBA.​

​для обработки ошибок.​рабочего листа​ последовательности Dim iStep​ проверить его функциональность​ больше букв, цифр​ помощью инструмента записи​ одновременного копирования любого​ Sub указывается имя​ макроса, если установленное​   ​ шрифтом имена клиентов​ (F – P).​ имеют широкое применение​ в ячейку (i,1)​ случае код выглядит,​

​ процессор Microsoft саморазвивается,​ Прежде всего необходимо​ В данном коде​Лист2​ As Integer ‘Хранит​ пошагово («отладкой»). Нажмите​ или нижнее подчеркивание,​

Применение VBA и макросов в Microsoft Excel

​ макросов.​ количества рабочих листов.​ макроса. Оператор «Range(«…»).Select»​ по умолчанию вас​На вкладке​ с просроченными счетами.​Результаты этих вычислений можно​ и позволяют работать​ записывается значение квадрата​ как:​ подстраиваясь под требования​ понять, что такое​

​ также показан пример​и выполняет с​ размер следующего приращения​ клавишу F8 каждый​ но максимальная длина​Сначала надо включить панель​Макрос для выделения и​ указывает выбор ячейки.​ не устраивает. Главное,​Разработчик​ Для этого можно​ лучше всего сразу​

​ со строками в​ i)​Sub programm()​

1. ​ конкретного пользователя. Разобравшись​ объект. В Excel​
2. ​ открытия и чтения​ ними арифметические операции.​ ‘Инициализируем переменные i​
3. ​ раз, когда вы​ имени составляет 80​ разработчика. Для этого​ удаления пустых столбцов​
4. ​ Например, при команде​ чтобы имя это​нажмите кнопку​ создать и выполнить​ внести в соответствующие​ «Эксель», создавая приложения,​Next (в некотором смысле​x1 = 1​

​ с тем, как​ в этом качестве​ данных из файла.​ Результаты заносятся в​ и iFib_Next i​ хотите перейти к​ символов.​ в меню «Файл»​ в Excel.​ «Range(«C4»).Select» выбирается ячейка​ начиналось с буквы,​Запись макроса​

​ макрос, который быстро​

Как работать с макросами в Excel

​ ячейки таблицы «Эксель».​ значительно облегчающие работу​ играет роль счетчика​x2 = 10​ создавать модули для​ выступают лист, книга,​’Процедура Sub присваивает​ ячейки столбца​

1 Правильные имена в макросах.

​ = 1 iFib_Next​ следующему шагу выполнения​Абсолютный адрес ячейки –​ открываем группу опций​Выделение, удаление, скрытие​ C4. Оператор «ActiveCell.FormulaR1C1»​ а не с​.​ применяет такое форматирование​Для итогов по факту​ с этими таблицами.​ и означает еще​shag = 0.1​ написания макросов, можно​

​ ячейка и диапазон.​ аргументам Val1 и​A​ = 0 ‘Цикл​ задачи. Процесс выполнения​ это точное местонахождение​ «Параметры». В появившемся​ и добавление пустых​ используется для записи​ цифры. Также, в​Если необходимо, заполните поля​ к выделенным ячейкам.​

2 Используйте относительные (не абсолютные) адреса ячеек

​ и прогнозу получают​Функции преобразования типа данных.​ один запуск цикла)​i = 1​ приступать к рассмотрению​ Данные объекты обладают​ Val2 значения ячеек​на активном рабочем​ Do While будет​ программы останавливается, когда​ курсора, когда информация​ окне «Параметры Excel»​ столбцов в таблицу​ действий в формулах,​ названии не должно​Имя макроса​Windows macOS ​ по формулам ItogP=ItogP​

​ Например, CVar возвращает​End Sub.​Do While x1 <​ конкретных примеров программ​ специальной иерархией, т.е.​ A1 и B1​ листе. В этом​ выполняться до тех​ он видит ошибку.​

3 Всегда начинайте запись с курсором в A1

​ о его размещении​ открываем группу «Настройка​ по условию пользователя​ и для других​ быть пробелов. Мы​,​Действия перед записью макроса​ + P и​ значение аргумента Expression,​Если все сделано правильно,​ x2 (цикл будет​ VBA Excel. Лучше​ подчиняются друг другу.​ ‘из рабочей книги​ макросе продемонстрировано использование​ пор, пока значение​ Вы можете исправить​ записывается в макро-адреса​ ленты». Обратите внимание​ с помощью макросов.​ расчетов.​ оставили название по​Сочетание клавиш​   ​ ItogF=ItogF+ F.​

​ преобразовав его в​ в том числе​ выполняться пока верно​ всего начать с​Главным из них является​ Data.xlsx, находящейся в​ объектов Excel. В​ ‘текущего числа Фибоначчи​ ошибку, которую легко​ с жесткой привязкой​ на правую колонку​ Исходные коды предоставляться​Попытаемся немного изменить макрос.​ умолчанию – «Макрос1».​и​Макросы и средства VBA​

4 Всегда перемещаться с клавиш направления в момент записи макроса

​Для отклонений используют =​ тип данных Variant.​ запись и запуск​ выражение x1 <​ самых элементарных кодов.​ Application, соответствующий самой​ папке C:Documents and​ частности, производится обращение​ не превысит 1000​

​ найти с помощью​ к конкретной ячейке​ настроек под аналогичным​ с описанием и​ Для этого, в​Тут же, при желании,​Описание​ находятся на вкладке​ (ItogF – ItogP)​

5 Создавайте макросы для конкретных небольших задач

​Функции работы с датами.​ макроса (см. инструкцию​ x2)​Задача: написать программу, которая​ программе Excel. Затем​ Settings Sub Set_Values(Val1​ процедурой​ Do While iFib_Next​ «отладки» или записать​ в момент записи.​ названием «Настройка ленты».​

​ примерами в картинках.​ макрос допишем выражение:​ можно установить сочетание​, а затем нажмите​Разработчик​

​ / ItogP *​ Они значительно расширяют​ выше), то при​y=x1 + x1^2 +​ будет копировать значение​ следуют Workbooks, Worksheets,​ As Double, Val2​Sub​ < 1000 If​ по-новому.​ Абсолютные адреса ограничивают​ В ней следует​Макрос для выделения и​Range(«C3»).Select​ клавиш, при нажатии​ кнопку​, которая по умолчанию​

exceltable.com

​ 100, если расчет​

Введение

Всем нам приходится — кому реже, кому чаще — повторять одни и те же действия и операции в Excel. Любая офисная работа предполагает некую «рутинную составляющую» — одни и те же еженедельные отчеты, одни и те же действия по обработке поступивших данных, заполнение однообразных таблиц или бланков и т.д. Использование макросов и пользовательских функций позволяет автоматизировать эти операции, перекладывая монотонную однообразную работу на плечи Excel. Другим поводом для использования макросов в вашей работе может стать необходимость добавить в Microsoft Excel недостающие, но нужные вам функции. Например функцию сборки данных с разных листов на один итоговый лист, разнесения данных обратно, вывод суммы прописью и т.д.

Макрос — это запрограммированная последовательность действий (программа, процедура), записанная на языке программирования Visual Basic for Applications (VBA). Мы можем запускать макрос сколько угодно раз, заставляя Excel выполнять последовательность любых  нужных нам действий, которые нам не хочется выполнять вручную.

В принципе, существует великое множество языков программирования (Pascal, Fortran, C++, C#, Java, ASP, PHP…), но для всех программ пакета Microsoft Office стандартом является именно встроенный язык VBA. Команды этого языка понимает любое офисное приложение, будь то Excel, Word, Outlook или Access.

Способ 1. Создание макросов в редакторе Visual Basic

Для ввода команд и формирования программы, т.е. создания макроса необходимо открыть специальное окно — редактор программ на VBA, встроенный в Microsoft Excel.

• В старых версиях (Excel 2003 и старше) для этого идем в меню Сервис — Макрос — Редактор Visual Basic (Toos — Macro — Visual Basic Editor).
• В новых версиях (Excel 2007 и новее) для этого нужно сначала отобразить вкладку Разработчик (Developer). Выбираем Файл — Параметры — Настройка ленты (File — Options — Customize Ribbon) и включаем в правой части окна флажок Разработчик (Developer). Теперь на появившейся вкладке нам будут доступны основные инструменты для работы с макросами, в том числе и нужная нам кнопка Редактор Visual Basic (Visual Basic Editor)
  
  
  
  :

К сожалению, интерфейс редактора VBA и файлы справки не переводятся компанией  Microsoft на русский язык, поэтому с английскими командами в меню и окнах придется смириться:

Макросы (т.е. наборы команд на языке VBA) хранятся в программных модулях. В любой книге Excel мы можем создать любое количество программных модулей и разместить там наши макросы. Один модуль может содержать любое количество макросов. Доступ ко всем модулям осуществляется с помощью окна Project Explorer в левом верхнем углу редактора (если его не видно, нажмите CTRL+R). Программные модули бывают нескольких типов для разных ситуаций:

• Обычные модули — используются в большинстве случаев, когда речь идет о макросах. Для создания такого модуля выберите в меню Insert — Module. В появившееся окно нового пустого модуля можно вводить команды на VBA, набирая их с клавиатуры или копируя их из другого модуля, с этого сайта или еще откуда нибудь:

  

• Модуль Эта книга — также виден в левом верхнем углу редактора Visual Basic в окне, которое называется Project Explorer. В этот модуль обычно записываются макросы, которые должны выполнятся при наступлении каких-либо событий в книге (открытие или сохранение книги, печать файла и т.п.):

  

• Модуль листа — доступен через Project Explorer и через контекстное меню листа, т.е. правой кнопкой мыши по ярлычку листа — команда Исходный текст (View Source). Сюда записывают макросы, которые должны выполняться при наступлении определенных событий на листе (изменение данных в ячейках, пересчет листа, копирование или удаление листа и т.д.)

  

 Обычный макрос, введенный в стандартный модуль выглядит примерно так:

Давайте разберем приведенный выше в качестве примера макрос Zamena:

• Любой макрос должен начинаться с оператора Sub, за которым идет имя макроса и список аргументов (входных значений) в скобках. Если аргументов нет, то скобки надо оставить пустыми.
• Любой макрос должен заканчиваться оператором End Sub.
• Все, что находится между Sub и End Sub — тело макроса, т.е. команды, которые будут выполняться при запуске макроса. В данном случае макрос выделяет ячейку заливает выделенных диапазон (Selection) желтым цветом (код = 6) и затем проходит в цикле по всем ячейкам, заменяя формулы на значения. В конце выводится окно сообщения (MsgBox).

С ходу ясно, что вот так сразу, без предварительной подготовки и опыта в программировании вообще и на VBA в частности, сложновато будет сообразить какие именно команды и как надо вводить, чтобы макрос автоматически выполнял все действия, которые, например, Вы делаете для создания еженедельного отчета для руководства компании. Поэтому мы переходим ко второму способу создания макросов, а именно…

Способ 2. Запись макросов макрорекордером

Макрорекордер — это небольшая программа, встроенная в Excel, которая переводит любое действие пользователя на язык программирования VBA и записывает получившуюся команду в программный модуль. Если мы включим макрорекордер на запись, а затем начнем создавать свой еженедельный отчет, то макрорекордер начнет записывать команды вслед за каждым нашим действием и, в итоге, мы получим макрос создающий отчет как если бы он был написан программистом. Такой способ создания макросов не требует знаний пользователя о программировании и VBA и позволяет пользоваться макросами как неким аналогом видеозаписи: включил запись, выполнил операци, перемотал пленку и запустил выполнение тех же действий еще раз. Естественно у такого способа есть свои плюсы и минусы:

• Макрорекордер записывает только те действия, которые выполняются в пределах окна Microsoft Excel. Как только вы закрываете Excel или переключаетесь в другую программу — запись останавливается.
• Макрорекордер может записать только те действия, для которых есть команды меню или кнопки в Excel. Программист же может написать макрос, который делает то, что Excel никогда не умел (сортировку по цвету, например или что-то подобное).
• Если во время записи макроса макрорекордером вы ошиблись — ошибка будет записана. Однако смело можете давить на кнопку отмены последнего действия (Undo) — во время записи макроса макрорекордером она не просто возрвращает Вас в предыдущее состояние, но и стирает последнюю записанную команду на VBA.

Чтобы включить запись необходимо:

• в Excel 2003 и старше — выбрать в меню Сервис — Макрос — Начать запись (Tools — Macro — Record New Macro)
• в Excel 2007 и новее — нажать кнопку Запись макроса (Record macro) на вкладке Разработчик (Developer)

Затем необходимо настроить параметры записываемого макроса в окне Запись макроса:

• Имя макроса — подойдет любое имя на русском или английском языке. Имя должно начинаться с буквы и не содержать пробелов и знаков препинания.
• Сочетание клавиш — будет потом использоваться для быстрого запуска макроса. Если забудете сочетание или вообще его не введете, то макрос можно будет запустить через меню Сервис — Макрос — Макросы — Выполнить (Tools — Macro — Macros — Run) или с помощью кнопки Макросы (Macros) на вкладке Разработчик (Developer) или нажав ALT+F8.
• Сохранить в… — здесь задается место, куда будет сохранен текст макроса, т.е. набор команд на VBA из которых и состоит макрос.:
• Эта книга — макрос сохраняется в модуль текущей книги и, как следствие, будет выполнятся только пока эта книга открыта в Excel
• Новая книга — макрос сохраняется в шаблон, на основе которого создается любая новая пустая книга в Excel, т.е. макрос будет содержаться во всех новых книгах, создаваемых на данном компьютере начиная с текущего момента
• Личная книга макросов — это специальная книга Excel  с именем Personal.xls, которая используется как хранилище макросов. Все макросы из Personal.xls загружаются в память при старте Excel и могут быть запущены в любой момент и в любой книге.

После включения записи и выполнения действий, которые необходимо записать, запись можно остановить командой Остановить запись (Stop Recording).

Запуск и редактирование макросов

Управление всеми доступными макросами производится в окне, которое можно открыть с помощью кнопки Макросы (Macros) на вкладке Разработчик (Developer) или — в старых версиях Excel — через меню Сервис — Макрос — Макросы (Tools — Macro — Macros):

• Любой выделенный в списке макрос можно запустить кнопкой Выполнить (Run).
• Кнопка Параметры (Options) позволяет посмотреть и отредактировать сочетание клавиш для быстрого запуска макроса.
• Кнопка Изменить (Edit) открывает редактор Visual Basic (см. выше) и позволяет просмотреть и отредактировать текст макроса на VBA.

Создание кнопки для запуска макросов

Чтобы не запоминать сочетание клавиш для запуска макроса, лучше создать кнопку и назначить ей нужный макрос. Кнопка может быть нескольких типов:

Кнопка на панели инструментов в Excel 2003 и старше

Откройте меню Сервис — Настройка (Tools — Customize) и перейдите на вкладку Команды (Commands). В категории Макросы легко найти веселый желтый «колобок» — Настраиваемую кнопку (Custom button):

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

Кнопка на панели быстрого доступа в Excel 2007 и новее

Щелкните правой кнопкой мыши по панели быстрого доступа в левом верхнем углу окна Excel и выберите команду Настройка панели быстрого доступа (Customise Quick Access Toolbar):

Затем в открывшемся окне выберите категорию Макросы и при помощи кнопки Добавить (Add) перенесите выбранный макрос в правую половину окна, т.е. на панель быстрого доступа:

Кнопка на листе

Этот способ подходит для любой версии Excel. Мы добавим кнопку запуска макроса прямо на рабочий лист, как графический объект. Для этого:

• В Excel 2003 и старше — откройте панель инструментов Формы через меню Вид — Панели инструментов — Формы (View — Toolbars — Forms)
• В Excel 2007 и новее — откройте выпадающий список Вставить (Insert) на вкладке Разработчик (Developer) 

Выберите объект Кнопка (Button):

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

Создание пользовательских функций на VBA

Создание пользовательских функций или, как их иногда еще называют, UDF-функций (User Defined Functions) принципиально не отличается от создания макроса в обычном программном модуле. Разница только в том, что макрос выполняет последовательность действий с объектами книги (ячейками, формулами и значениями, листами, диаграммами и т.д.), а пользовательская функция — только с теми значениями, которые мы передадим ей как аргументы (исходные данные для расчета).

Чтобы создать пользовательскую функцию для расчета, например, налога на добавленную стоимость (НДС) откроем редактор VBA, добавим новый модуль через меню Insert — Module и введем туда текст нашей функции:

Обратите внимание, что в отличие от макросов функции имеют заголовок Function вместо Sub и непустой список аргументов (в нашем случае это Summa). После ввода кода наша функция становится доступна в обычном окне Мастера функций (Вставка — Функция) в категории Определенные пользователем (User Defined):

После выбора функции выделяем ячейки с аргументами (с суммой, для которой надо посчитать НДС) как в случае с обычной функцией: