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

Научитесь: 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. Она​’Наш код​

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

Процедура

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

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

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

Процедура

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

​ 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):

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