Как можно создавать макросы в excel

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

Введение

Всем нам приходится — кому реже, кому чаще — повторять одни и те же действия и операции в 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):

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

Макрос записывается двумя способами: автоматически и вручную. Воспользовавшись первым вариантом, вы просто записываете определенные действия в Microsoft Excel, которые выполняете в данный момент времени. Потом можно будет воспроизвести эту запись. Такой метод очень легкий и не требует знания кода, но применение его на практике довольно ограничено. Ручная запись, наоборот, требует знаний программирования, так как код набирается вручную с клавиатуры. Однако грамотно написанный таким образом код может значительно ускорить выполнение процессов.

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

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

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

Создать макрос в Excel с помощью макрорекордера

Для начала проясним, что собой представляет макрорекордер и при чём тут макрос.

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

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

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

Для включения макрорекордера на запись необходимо произвести следующие действия:

• в версии Excel от 2007 и к более новым вам нужно на вкладке «Разработчик» нажать кнопочку «Запись макроса»
• в версиях Excel от 2003 и к более старым (они еще очень часто используются) вам нужно в меню «Сервис» выбрать пункт «Макрос» и нажать кнопку «Начать запись».

 Sub ОтносительныеСсылки() ' ' ОтносительныеСсылки Макрос ' ' ActiveCell.Offset(1, 0).Range("A1").Select ActiveCell.FormulaR1C1 = "Excel" ActiveCell.Offset(1, 0).Range("A1").Select End Sub 

Помогла ли Вам статья?

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

​Смотрите также​ курсора, когда информация​ помощью инструмента записи​:​ только пока эта​ то макрорекордер начнет​ такого модуля выберите​ работу на плечи​ переменных:​ применять функции VBA.​ to 10 Next​ результате оказываются в​

​ используется Selection.ClearContents. Ее​Узнайте о том, как​

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

​Остановить запись​ записывать код макросов​

• ​ как работает записанный​
• ​Макросы программы Microsoft Excel​

​ о его размещении​ макросов.​Затем в открывшемся окне​ книга открыта в​ записывать команды вслед​ в меню​ Excel. Другим поводом​NN– номер текущей строки​ Всего в этом​Команда переводится на «человеческий»​ среде VBA. Собственно,​ выполнение означает очистку​ создавать и запускать​

​.​ с нуля. Для​ макрос, кликаем в​ позволяют значительно ускорить​ записывается в макро-адреса​Сначала надо включить панель​ выберите категорию​ Excel​

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

​ за каждым нашим​Insert — Module​ для использования макросов​ таблицы;​

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

​ того, чтобы приступить​ том же блоке​ работу с документами​ с жесткой привязкой​ разработчика. Для этого​Макросы​Новая книга​ действием и, в​. В появившееся окно​ в вашей работе​TP и TF –​ специально для написания​ от 1 до​ находится между строками​

​Прежде всего требуется создать​ см. в статье​   ​ к этому, нужно​ инструментов «Код» по​ в этом табличном​ к конкретной ячейке​ в меню «Файл»​и при помощи​- макрос сохраняется​ итоге, мы получим​ нового пустого модуля​

​ может стать необходимость​ планируемый и фактический​ приложений в «Эксель»​ 10 с шагом​ Sub Макрос1() и​ файл и сохранить​ Создание, выполнение, изменение​При редактировании макроса можно​ нажать на кнопку​ кнопке «Макросы», или​ редакторе. Это достигается​ в момент записи.​

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

​ и Word, около​ один».​ End Sub.​

​ его, присвоив имя​ и удаление макроса.​ немного изучить язык​ «Visual Basic», которая​ жмем сочетание клавиш​ путем автоматизации повторяющихся​ Абсолютные адреса ограничивают​ «Параметры». В появившемся​

​Добавить (Add)​ основе которого создается​ как если бы​ на VBA, набирая​

​ Excel недостающие, но​SF и SP –​ 160 функций. Их​Если ставится задача получить​Если копирование было выполнено,​ и выбрав тип​

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

​Немногие знают, что первая​ программирования Visual Basic.​ расположена в самом​ Alt+F8.​ действий, записанных в​ возможности макроса, если​ окне «Параметры Excel»​перенесите выбранный макрос​

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

​ например, из ячейки​ «Книга Excel с​ версия популярного продукта​Чтобы изменить макрос, в​ начале ленты разработчика.​После этого, открывается окно​ специальный код. Давайте​ будут добавляться /​ открываем группу «Настройка​ в правую половину​ книга в Excel,​ программистом. Такой способ​

​ или копируя их​ Например функцию сборки​ сумма издержек;​ несколько больших групп.​

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

​ например, всех нечетных​ А1 в ячейку​ поддержкой макросов».​ Microsoft Excel появилась​ группе​После этого, открывается знакомое​ со списком записанных​

​ разберем, как создать​ удаляться данные на​ ленты». Обратите внимание​ окна, т.е. на​

​ т.е. макрос будет​ создания макросов не​ из другого модуля,​ данных с разных​IP и IF –​ Это:​ чисел из диапазона​ C1, то одна​Затем необходимо перейти в​ в 1985 году.​Код​ нам окно редактора​ макросов. Ищем макрос,​ макросы в программе​ листе Excel или​

​ на правую колонку​ панель быстрого доступа:​ содержаться во всех​

​ требует знаний пользователя​
​ с этого сайта​

​ листов на один​ планируемый и фактически​Математические функции. Применив их​

​ от 1 до​ из строк кода​ приложение VB, для​ С тех пор​на вкладке​ VBE.​ который мы записали,​ Excel, и как​ список данных будет​ настроек под аналогичным​

​Кнопка на листе​ новых книгах, создаваемых​ о программировании и​ или еще откуда​ итоговый лист, разнесения​ уровень издержек.​ к аргументу, получают​ 11, то пишем:​ будет выглядеть, как​ чего достаточно воспользоваться​ он пережил несколько​Разработчик​Программист пишет там код​ выделяем его, и​ их можно отредактировать.​ становиться больше. Относительные​ названием «Настройка ленты».​Этот способ подходит для​ на данном компьютере​ VBA и позволяет​ нибудь:​

​ данных обратно, вывод​Обозначим теми же буквами,​ значение косинуса, натурального​For i = 1​ Range(“C1”).Select. В переводе​ комбинацией клавиш «Alt»​ модификаций и востребован​нажмите кнопку​ макроса вручную.​ жмем на кнопку​Скачать последнюю версию​ средства не привязывают​ В ней следует​ любой версии Excel.​ начиная с текущего​ пользоваться макросами как​Модуль Эта книга​

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

​ суммы прописью и​ но с «приставкой»​ логарифма, целой части​ to 10 step​ это выглядит, как​ и «F11». Далее:​ у миллионов пользователей​Макросы​Как видим, макросы в​ «Выполнить».​ Excel​ курсор к конкретному​

​ отметить галочкой опцию​ Мы добавим кнопку​ момента​

​ неким аналогом видеозаписи:​- также виден​

​ т.д.​ Itog накопление итога​ и пр.​ 1 Next.​ «Диапазон(“C1”).Выделить», иными словами​в строке меню, расположенном​ по всему миру.​, выделите имя макроса​ Microsoft Excel могут​Можно поступить ещё проще,​Макрос можно записать двумя​ адресу ячейки.​ «Разработчик» как показано​ запуска макроса прямо​Личная книга макросов​

​ включил запись, выполнил​

lumpics.ru

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

​ в левом верхнем​​Макрос​ по данному столбцу.​Финансовые функции. Благодаря их​Здесь step — шаг.​ осуществляет переход в​ в верхней части​ При этом многие​ и нажмите кнопку​ значительно ускорить выполнение​ и не вызывать​ способами:​По умолчанию в Excel​ ниже на рисунке:​ на рабочий лист,​- это специальная​ операци, перемотал пленку​ углу редактора Visual​- это запрограммированная​ Например, ItogTP –​ наличию и используя​

​ В данном случае​ VBA Excel, в​ окна, нажимают на​ работают лишь с​Изменить​ рутинных и однообразных​ даже окно выбора​автоматически;​ включен режим «Абсолют»,​Теперь нам доступна на​ как графический объект.​ книга Excel с​ и запустил выполнение​ Basic в окне,​ последовательность действий (программа,​

​ касается столбца таблицы,​ программирование в Excel,​ он равен двум.​ ячейку С1.​ иконку рядом с​ малой толикой возможностей​. Запустится редактор Visual​ процессов. Но, в​ макросов. Мы же​вручную.​ но вы можете​ ленте новая закладка​

​ Для этого:​

Процедура

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

• ​ Excel и создания​Формы​ макросы из​ и минусы:​

• ​ выполнятся при наступлении​ запускать макрос сколько​ Если требуется осуществить​

Процедура

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

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

support.office.com

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

​ Excel.​’Наш код​ Application, который изначально​ Посмотрите, что произойдет.​ процесса выполнения задачи.​ в точности все​ и не требует​ А1) – до​ жизнь пользователю. Каждый​В Excel 2007 и​ момент и в​ Excel или переключаетесь​- доступен через​ вручную.​ (F – P).​ нее входят, например,​ шага автоматически будет​Циклы VBA помогают создавать​

Что такое VBA

​End Sub​ встроен в самый​Дополнительные сведения о создании​Автор: Максим Тютюшев​ те действия, которые​ знания кода, но​ адреса курсора с​

​ пользователь может создать​ новее — откройте​ любой книге.​ в другую программу​ Project Explorer и​В принципе, существует великое​Результаты этих вычислений можно​ функции Space для​ расти и номер​ различные макросы. Предположим,​Обратите внимание, что строка​

​ известный табличный процессор​ макросов см. в​Примечание:​ были записаны ранее.​ применение его на​ вашими данными. Если​ макрос без знания​ выпадающий список​После включения записи и​ — запись останавливается.​ через контекстное меню​ множество языков программирования​ лучше всего сразу​ создания строки с​ у строки. Таким​ что имеется функция​ «’Наш код» будет​ от Microsoft.​ статье Создание и​ Мы стараемся как можно​Для того, чтобы отредактировать​ практике довольно ограничено.​

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

​ вы сохранили ваш​ языков программирования. Для​Вставить (Insert)​ выполнения действий, которые​Макрорекордер может записать только​ листа, т.е. правой​ (Pascal, Fortran, C++,​ внести в соответствующие​ числом пробелов, равных​ образом, произойдет оптимизация​ y=x + x2​ выделена другим цветом​К его достоинствам специалисты​

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

​ C#, Java, ASP,​ ячейки таблицы «Эксель».​ целочисленному аргументу, или​ кода.​ + 3×3 –​ (зеленым). Причина в​ относят сравнительную легкость​Сведения о запуске макросов​

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

​ можно остановить командой​ которых есть команды​ ярлычку листа -​ PHP…), но для​Для итогов по факту​ Asc для перевода​В целом код будет​ cos(x). Требуется создать​ апострофе, поставленном в​ освоения. Как показывает​ см. в статье​ на вашем языке.​ В открывшемся окне​ так как код​ так и делать),​

​ помощью кнопки «Запись​ ​Остановить запись​ меню или кнопки​

Как начать

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

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

• ​ набирается вручную с​ то вы можете​ макроса».​Выберите объект​(Stop Recording)​
• ​ в Excel. Программист​
• ​Исходный текст (View Source)​ Microsoft Office стандартом​ по формулам ItogP=ItogP​
• ​ ANSI. Все они​Sub program()​

​ ее графика. Сделать​

​ обозначает, что далее​

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

​Действия перед записью макроса​

​ автоматически, поэтому ее​ и кликаем по​ клавиатуры. Но, грамотно​ использовать свою программу​В этом режиме все​Кнопка (Button):​.​ же может написать​

​. Сюда записывают макросы,​ является именно встроенный​ + P и​ имеют широкое применение​For i = 1​ это можно только,​ следует комментарий.​ пользователи, которые не​   ​ текст может содержать​ кнопке «Изменить».​ написанный таким образом​ на других листах​ действия пользователя макрорекодер​

Макросы в Excel

​Затем нарисуйте кнопку на​Управление всеми доступными макросами​ макрос, который делает​ которые должны выполняться​ язык VBA. Команды​ ItogF=ItogF+ F.​ и позволяют работать​ To 10 Step​ используя циклы VBA.​Теперь вы можете написать​ имеют навыков профессионального​Убедитесь в том, что​ неточности и грамматические​Открывается Microsoft Visual Basic​ код, может значительно​ с аналогичными данными.​ в Excel записывает,​ листе, удерживая левую​ производится в окне,​ то, что Excel​

Пример 1

​ при наступлении определенных​ этого языка понимает​Для отклонений используют =​ со строками в​ 1 (можно записать​

​За начальное и конечное​

• ​ любой код и​
• ​ программирования. К особенностям​
• ​ на ленте отображается​
• ​ ошибки. Для нас​

​ (VBE) – среда,​ ускорить выполнение процессов.​ Независимо от того,​ переводя на язык​ кнопку мыши. Автоматически​ которое можно открыть​ никогда не умел​ событий на листе​ любое офисное приложение,​

​ (ItogF – ItogP)​ «Эксель», создавая приложения,​ просто For i​ значение аргумента функции​ создать для себя​ VBA относится выполнение​ вкладка​ важно, чтобы эта​ где происходит редактирование​

​Прежде, чем начать автоматическую​

• ​ где ваш курсор​ программирования VBA-код в​
• ​ появится окно, где​ с помощью кнопки​
• ​ (сортировку по цвету,​ (изменение данных в​ будь то Excel,​

​ / ItogP *​ значительно облегчающие работу​ = 1 To​ берут x1=0 и​

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

​ Word, Outlook или​ 100, если расчет​ с этими таблицами.​ 10)​ x2=10. Кроме того,​ VBA Excel (примеры​ офисных приложений.​. По умолчанию вкладка​ полезна. Просим вас​Запись каждого макроса начинается​ включить макросы в​ начинаете запись макроса!​

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

Пример 2

​Функции преобразования типа данных.​Cells(i, 1).Value = i​ необходимо ввести константу​

​ программ см. далее).​Недостатком программы являются проблемы,​Разработчик​ уделить пару секунд​ с команды Sub,​ программе Microsoft Excel.​ Даже если он​ получаем готовую программу,​ при щелчке по​Разработчик (Developer)​

​Если во время записи​ листа и т.д.)​Для ввода команд и​ а в случае​ Например, CVar возвращает​ ^ 2 (т.е.​ — значение для​ Конечно, тем, кто​ связанные с совместимостью​

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

​или — в​

​ макроса макрорекордером вы​

​Обычный макрос, введенный в​

​ формирования программы, т.е.​

​ суммарной величины —​

​ значение аргумента Expression,​ в ячейку (i,1)​ шага изменения аргумента​ знаком с азами​ различных версий. Они​

​ необходимо выполнить указанные​ ли она вам,​

​ End Sub. Сразу​ «Разработчик». Кликаем по​ ячейке A1, ваш​ те действия, которые​

​Создание пользовательских функций или,​ старых версиях Excel​ ошиблись — ошибка​ стандартный модуль выглядит​

​ создания макроса необходимо​ (ItogF – ItogP).​

​ преобразовав его в​ записывается значение квадрата​ и начальное значение​

​ Visual Basic, будет​

​ обусловлены тем, что​

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

​ будет записана. Однако​ примерно так:​ открыть специальное окно​

Пример 3

​Результаты опять же сразу​ тип данных Variant.​ i)​ для счетчика.​ намного проще. Однако​ код программы VBA​Выберите​

​ внизу страницы. Для​ Sub указывается имя​ которая расположена на​ записывать после нажатия​ записи.​ еще называют, UDF-функций​Сервис — Макрос -​ смело можете давить​Давайте разберем приведенный выше​

​ — редактор программ​ записываются в соответствующие​Функции работы с датами.​Next (в некотором смысле​Все примеры макросов VBA​ даже те, кто​ обращается к функциональным​Excel​

​ удобства также приводим​ макроса. Оператор «Range(«…»).Select»​

​ ленте в блоке​ клавиш должны быть​Как записать готовый макрос​ (User Defined Functions)​ Макросы​

​ на кнопку отмены​ в качестве примера​ на VBA, встроенный​ ячейки, поэтому нет​ Они значительно расширяют​ играет роль счетчика​

​ Excel создаются по​ их не имеет,​ возможностям, которые присутствуют​

​>​ ссылку на оригинал​ указывает выбор ячейки.​ инструментов «Код».​ Ctrl + Home.​ в Excel? Очень​ принципиально не отличается​

​(Tools — Macro -​ последнего действия (Undo)​ макрос​ в Microsoft Excel.​ необходимости их присваивания​ стандартные возможности «Эксель».​ и означает еще​ той же процедуре,​ при желании смогут​ в новой версии​Параметры​

​ (на английском языке).​ Например, при команде​

​Открывается окно настройки записи​

​Пример: Представьте себе, что​ просто:​ от создания макроса​ Macros)​ — во время​Zamena​

​В старых версиях (Excel​ переменным.​ Так, функция WeekdayName​ один запуск цикла)​ которая представлена выше.​

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

​ «Range(«C4»).Select» выбирается ячейка​

​ макроса. Тут можно​ каждый месяц вы​На вкладке «Разработчик» нажимаем​ в обычном программном​:​ записи макроса макрорекордером​:​ 2003 и старше)​Перед запуском созданной программы,​ возвращает название (полное​End Sub.​

Пример 4

​ В данном конкретном​За таким названием скрываются​ в старой. Также​Лента и панель​ в Microsoft Excel​ C4. Оператор «ActiveCell.FormulaR1C1»​ указать любое имя​ получаете десятки таблиц​ кнопку «Запись макроса».​ модуле. Разница только​Любой выделенный в списке​ она не просто​Любой макрос должен начинаться​ для этого идем​ требуется сохранить рабочую​ или частичное) дня​Если все сделано правильно,​

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

​ макроса, если установленное​

​ из всех филиалов.​

​В появившимся диалоговом окне​

​ в том, что​ макрос можно запустить​ возрвращает Вас в​ с оператора​ в меню​ книгу, например, под​

​ недели по его​

​ в том числе​ как:​ языке Visual Basic​ и чрезмерно высокую​В категории​

​ макрос. Макрос представляет​ действий в формулах,​

​ по умолчанию вас​ От вас требуется​

​ заполняем параметры макроса.​

​ макрос выполняет последовательность​

​ кнопкой​ предыдущее состояние, но​Sub​Сервис — Макрос -​

Функции VBA

​ названием «Отчет1.xls».​ номеру. Еще более​ запись и запуск​Sub programm()​ for Application. Таким​ открытость кода для​Настроить ленту​ собой действие (или​ и для других​ не устраивает. Главное,​ организовать данные и​ И нажимаем «ОК».​ действий с объектами​Выполнить​ и стирает последнюю​, за которым идет​

• ​ Редактор Visual Basic​Клавишу «Создать отчетную таблицу»​ полезной является Timer.​ макроса (см. инструкцию​x1 = 1​
• ​ образом, программирование в​ изменения посторонним лицом.​в списке​ набор действий), которое​ расчетов.​ чтобы имя это​ рассчитать показатели, чтобы​
• ​После завершения нажимаем на​ книги (ячейками, формулами​(Run)​
• ​ записанную команду на​ имя макроса и​(Toos — Macro -​ требуется нажать всего​ Он выдает число​ выше), то при​x2 = 10​ Excel — это​ Тем не менее​Основные вкладки​ можно выполнять любое​Попытаемся немного изменить макрос.​ начиналось с буквы,​ произвести еще один​ кнопку «Остановить запись»,​ и значениями, листами,​.​
• ​ VBA.​ список аргументов (входных​ Visual Basic Editor)​ 1 раз после​ секунд, которые прошли​
• ​ его вызове каждый​shag = 0.1​ создание макросов с​ Microsoft Office, а​установите флажок​ количество раз. При​ Для этого, в​ а не с​ ежемесячный отчет. Вы​ после чего макрос​ диаграммами и т.д.),​Кнопка​Чтобы включить запись необходимо:​
• ​ значений) в скобках.​.​ ввода заголовочной информации.​ с полуночи до​ раз будет получаться​
• ​i = 1​ нужным кодом. Благодаря​ также IBM Lotus​Разработчик​ создании макроса записываются​ макрос допишем выражение:​ цифры. Также, в​
• ​ можете записать макрос​

​ будет автоматически сохранен.​ а пользовательская функция​Параметры​в Excel 2003 и​

Пример 5

​ Если аргументов нет,​В новых версиях (Excel​ Следует знать и​

​ конкретного момента дня.​ столбец заданного размера​Do While x1 <​

• ​ этой возможности табличный​ Symphony позволяют пользователю​, а затем нажмите​
• ​ щелчки мышью и​Range(«C3»).Select​ названии не должно​ для выполнения всех​Для выполнения или редактирования​ — только с​(Options)​

​ старше — выбрать​ то скобки надо​

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

​ 2007 и новее)​ другие правила. В​Функции для преобразования числового​ (в данном случае​ x2 (цикл будет​ процессор Microsoft саморазвивается,​ применять шифрование начального​ кнопку​ нажатия клавиш. После​ActiveCell.FormulaR1C1 = «11»​ быть пробелов. Мы​ этих функций, в​ записанного макроса нажимаем​ теми значениями, которые​позволяет посмотреть и​ в меню​ оставить пустыми.​ для этого нужно​

Переменные

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

• ​ кода и установку​Сохранить​
• ​ создания макроса его​Выражение «ActiveCell.FormulaR1C1 = «=R[-3]C+R[-2]C+R[-1]C»»​ оставили название по​
• ​ том числе открытие​ на кнопку «Макросы»​ мы передадим ей​
• ​ отредактировать сочетание клавиш​Сервис — Макрос -​Любой макрос должен заканчиваться​

​ сначала отобразить вкладку​ строку» должна нажиматься​ системы счисления. Например,​ ячеек).​ выражение x1 <​ конкретного пользователя. Разобравшись​ пароля для его​.​

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

​ можно отредактировать, чтобы​ заменим на «ActiveCell.FormulaR1C1​ умолчанию – «Макрос1».​ и соединение всех​ (или комбинацию клавиш​ как аргументы (исходные​ для быстрого запуска​ Начать запись​ оператором​

​Разработчик (Developer)​ каждый раз после​ Oct выдает в​В повседневной жизни сплошь​

​ x2)​ с тем, как​ просмотра.​Запись макроса​ изменить выполняемые им​

​ = «= R[-4]C+R[-3]C+R[-2]C+R[-1]C»».​Тут же, при желании,​ листов в одну​ ALT+F8). Появится окно​ данные для расчета).​ макроса.​(Tools — Macro -​End Sub​

​. Выбираем​ ввода в таблицу​ восьмеричное представление числа.​ и рядом возникает​y=x1 + x1^2 +​

​ создавать модули для​Именно с этими понятиями​   ​ действия.​

​Закрываем редактор, и запускаем​ можно установить сочетание​ комбинированную таблицу.​ со списком записанных​Чтобы создать пользовательскую функцию​Кнопка​ Record New Macro)​.​Файл — Параметры -​ значений по каждому​Функции форматирования. Важнейшей из​ необходимость принять то​ 3*x1^3 – Cos(x1)​ написания макросов, можно​ нужно разобраться тем,​На вкладке​Допустим, что необходимо каждый​

​ макрос, как и​ клавиш, при нажатии​Используйте кнопки со стрелками​ макросов и кнопками​ для расчета, например,​Изменить​в Excel 2007 и​Все, что находится между​ Настройка ленты (File​ виду деятельности. После​ них является Format.​ или иное решение​Cells(i, 1).Value = x1​ приступать к рассмотрению​ кто собирается работать​Разработчик​ месяц создавать отчет​ в прошлый раз.​ на которые макрос​ для управления курсором​ для управления ими.​ налога на добавленную​(Edit)​ новее — нажать​

​Sub​

fb.ru

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

Введение

​ — Options -​ занесения всех данных​ Она возвращает значение​ в зависимости от​ (значение x1 записывается​ конкретных примеров программ​ в среде VBA.​нажмите кнопку​ для главного бухгалтера.​ Как видим, вследствие​ будет запускаться. Первой​ (Ctrl + Up,​С помощью макропрограмм можно​ стоимость (НДС) откроем​открывает редактор Visual​ кнопку​и​ Customize Ribbon)​ требуется нажать кнопку​ типа Variant с​ какого-то условия. Не​ в ячейку с​ VBA Excel. Лучше​ Прежде всего необходимо​Запись макроса​ Требуется выделить красным​ введенных нами изменений​ клавишей обязательно должна​ и т.п.). Позиционируйте​ увеличить производительность труда​ редактор VBA, добавим​ Basic (см. выше)​Запись макроса (Record macro)​End Sub​и включаем в​

​ «Закончить» и затем​​ выражением, отформатированным согласно​ обойтись без них​ координатами (i,1))​ всего начать с​ понять, что такое​.​ цветом и полужирным​ была добавлена ещё​ быть клавиша Ctrl,​ курсор, так чтобы​ пользователя в десятки​ новый модуль через​ и позволяет просмотреть​

​на вкладке​- тело макроса,​ правой части окна​ переключиться в окно​ инструкциям, которые заданы​ и в VBA​Cells(i, 2).Value = y​ самых элементарных кодов.​ объект. В Excel​Если необходимо, заполните поля​ шрифтом имена клиентов​ одна ячейка с​ а вторую клавишу​ вы могли добавить,​

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

​ раз. Но чтобы​ меню​ и отредактировать текст​Разработчик (Developer)​ т.е. команды, которые​ флажок​ «Эксель».​

• ​ в описании формата.​ Excel. Примеры программ,​ (значение y записывается​Задача: написать программу, которая​​ в этом качестве​Имя макроса​ ​ с просроченными счетами.​ данными. Она также​​ пользователь устанавливает самостоятельно.​
• ​ изменить или удалить​ использовать запись пользовательских​Insert — Module​ макроса на VBA.​​Затем необходимо настроить параметры​​ будут выполняться при​​Разработчик (Developer)​Теперь вы знаете, как​и пр.​ где дальнейший ход​​ в ячейку с​ будет копировать значение​ выступают лист, книга,​​,​​ Для этого можно​ была включена в​ Например, мы, в​ данные внутри таблицы​ макросов на все​и введем туда​Чтобы не запоминать сочетание​​ записываемого макроса в​ ​ запуске макроса. В​
  
  ​. Теперь на появившейся​

​ решать задачи для​Изучение свойств этих функций​ выполнения алгоритма выбирается,​ координатами (i,2))​ содержимое одной ячейки​ ячейка и диапазон.​Сочетание клавиш​ создать и выполнить​

​ расчет общей суммы.​ качестве примера, установили​ по мере необходимости.​ 100% следует соблюдать​ текст нашей функции:​ клавиш для запуска​ окне​ данном случае макрос​ вкладке нам будут​ Excel с помощью​ и их применение​ а не предопределен​i = i +​ и затем записывать​ Данные объекты обладают​и​ макрос, который быстро​В случае, если макрос​ клавишу М.​Использование мыши для навигации​ простые правила, которые​

• ​Обратите внимание, что в​​ макроса, лучше создать​Запись макроса​ выделяет ячейку заливает​ доступны основные инструменты​ макросов. Умение применять​ позволит значительно расширить​​ изначально, чаще всего​​ 1 (действует счетчик);​ в другую.​ специальной иерархией, т.е.​Описание​ применяет такое форматирование​ слишком большой, его​Далее, нужно определить, где​ является более сложным​ существенно влияют на​ отличие от макросов​
  
• ​ кнопку и назначить​​:​ выделенных диапазон (Selection)​ для работы с​ vba excel (примеры​ сферу применения «Эксель».​ используют конструкцию If​x1 = x1 +​Для этого:​ подчиняются друг другу.​, а затем нажмите​ к выделенным ячейкам.​ выполнение может занять​ будет храниться макрос.​
  
• ​ и не так​​ их качество в​ функции имеют заголовок​ ей нужный макрос.​Имя макроса​ желтым цветом (код​ макросами, в том​ программ см. выше)​​Попробуем перейти к решению​​ …Then (для сложных​ shag (аргумент изменяется​открывают вкладку «Вид»;​Главным из них является​ кнопку​Windows macOS ​ значительное время. Но,​ По умолчанию, он​
  

​ надежным в момент​ момент записи и​Function​

​ Кнопка может быть​- подойдет любое​ = 6) и​​ числе и нужная​​ может понадобиться и​

• ​ более сложных задач.​ случаев) If …Then​​ на величину шага);​​переходят на пиктограмму «Макросы»;​ Application, соответствующий самой​OK​Действия перед записью макроса​ путем внесения ручного​ будет храниться в​ записи. Когда дело​
• ​ эффективность при выполнении.​вместо​​ нескольких типов:​​ имя на русском​
• ​ затем проходит в​​ нам кнопка​​ для работы в​​ Например:​​ …END If.​Loop​жмут на «Запись макроса»;​ программе Excel. Затем​, чтобы начать запись​   ​ изменения в код,​ этой же книге​ доходит до макросов,​​Sub​Кнопка на панели инструментов​ или английском языке.​ цикле по всем​Редактор Visual Basic​

​ среде самого популярного​Дан бумажный документ отчета​Рассмотрим конкретный случай. Предположим,​End Sub.​заполняют открывшуюся форму.​ следуют Workbooks, Worksheets,​ макроса.​Макросы и средства VBA​ мы можем ускорить​ (файле), но при​ использовать мышь лучше​5 простых советов, которые​и непустой список​ в Excel 2003​ Имя должно начинаться​ ячейкам, заменяя формулы​(Visual Basic Editor)​ на данный момент​ фактического уровня издержек​

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

​ необходимо создать макрос​​В результате запуска данного​Для простоты в поле​ а также Range.​Выполните действия, которые нужно​ находятся на вкладке​ процесс. Добавляем команду​ желании можно установить​ только для вызова​ помогут в создании​ аргументов (в нашем​ и старше​ с буквы и​ на значения. В​:​ текстового редактора «Ворд».​ предприятия. Требуется:​ для «Эксель», чтобы​ макроса в «Эксель»​ «Имя макроса» оставляют​ Например, для обращения​ автоматизировать, например ввод​Разработчик​ «Application.ScreenUpdating = False».​ хранение в новой​ меню.​ макросов без программирования.​ случае это​Откройте меню​ не содержать пробелов​ конце выводится окно​К сожалению, интерфейс редактора​ В частности, можно​разработать его шаблонную часть​ в ячейку с​ получаем два столбца,​

• ​ «Макрос1», а в​ к ячейке A1​ стандартного текста или​, которая по умолчанию​ Она позволит сохранить​ книге, или в​Держите ваши макросы для​ Воспользуйтесь этими простыми​
• ​Summa​Сервис — Настройка​ и знаков препинания.​ сообщения (MsgBox).​ VBA и файлы​ путем записи, как​ посредством табличного процессора​ координатами (1,1) было​ в первом из​ поле «Сочетание клавиш»​ на конкретном листе​ заполнение столбца данных.​
• ​ скрыта, поэтому сначала​ вычислительные мощности, а​ отдельной книге макросов.​ небольших специфичных задач.​ советами, которые позволяют​). После ввода кода​(Tools — Customize)​Сочетание клавиш​С ходу ясно, что​ справки не переводятся​ показано в самом​ «Эксель»;​ записано:​ которых записаны значения​ вставляют, например, hh​

​ следует указать путь​

• ​На вкладке​ нужно включить ее.​ значит ускорить работу.​​ Мы оставим значение​ Чем больше программный​ ​ быстро и просто​ наша функция становится​
• ​и перейдите на​- будет потом​ вот так сразу,​​ компанией Microsoft на​​ начале статьи, или​​составить программу VBA, которая​

​1, если аргумент положительный;​ для x, а​ (это значит, что​​ с учетом иерархии.​​Разработчик​

• ​ Дополнительные сведения см.​​ Это достигается путем​ по умолчанию.​ код в макросе,​ создавать качественные макропрограммы​ доступна в обычном​ вкладку​ использоваться для быстрого​
• ​ без предварительной подготовки​​ русский язык, поэтому​ через написание кода​ будет запрашивать исходные​0, если аргумент нулевой;​ во втором —​ запустить программку можно​Что касается понятия «коллекция»,​в группе​​ в статье Отображение​ отказа от обновления​ ​В самом нижнем поле​ тем медленнее он​​ автоматически:​ окне Мастера функций​​Команды (Commands)​​ запуска макроса. Если​​ и опыта в​​ с английскими командами​
• ​ создавать кнопки меню,​​ данные для ее​-1, если аргумент отрицательный.​ для y.​ будет блиц-командой «Ctrl+h»).​ то это группа​Код​ вкладки «Разработчик».​
• • ​ экрана во время​​ настройки макросов можно​ работает, особенно если​Присваивайте макросам короткие, но​ (​. В категории​ забудете сочетание или​ программировании вообще и​
  • ​ в меню и​​ благодаря которым многие​ заполнения, осуществлять необходимые​Создание такого макроса для​Затем по ним строится​ Нажимают Enter.​ объектов того же​нажмите кнопку​Запись макроса​ выполнения вычислительных действий.​ оставить любое подходящее​ это требуется для​
  • ​ содержательные имена. Когда​​Вставка — Функция​Макросы​ вообще его не​​ на VBA в​​ окнах придется смириться:​ операции над текстом​ расчеты и заполнять​​ «Эксель» начинается стандартным​​ график способом, стандартным​Теперь, когда уже запущена​ класса, которая в​Остановить запись​   ​ Чтобы возобновить обновление​

​ по контексту описание​ выполнения многих функций​ вы войдете вкус,​) в категории​​легко найти веселый​ ​ введете, то макрос​​ частности, сложновато будет​

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

​Макросы (т.е. наборы команд​ можно будет осуществлять​ ими соответствующие ячейки​ способом, через использование​​ для «Эксель».​​ запись макроса, производят​​ записи имеет вид​​.​В группе​ после выполнения макроса,​​ данного макроса. Но,​ или рассчитать много​ ​ со временем вам​Определенные пользователем (User Defined)​​ желтый «колобок» -​

• ​ можно будет запустить​ сообразить какие именно​ на языке VBA)​​ нажатием дежурных клавиш​ ​ шаблона.​​ «горячих» клавиш Alt​
• ​Для реализации циклов в​​ копирование содержимого какой-либо​ ​ ChartObjects. Ее отдельные​​Более подробное изучение макроса​Код​ в его конце​ это делать не​
• ​ формул в большой​​ придется создавать много​ ​:​​Настраиваемую кнопку​ через меню​ команды и как​ хранятся в программных​ или через вкладку​

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

​Рассмотрим один из вариантов​ и F11. Далее​ VBA Excel 2010,​ ячейки в другую.​ элементы также являются​   ​на вкладке​

​ пишем команду «Application.ScreenUpdating​ обязательно.​ электронной таблице.​

​ макросов. При выборе​​После выбора функции выделяем​ ​(Custom button)​​Сервис — Макрос -​ надо вводить, чтобы​​ модулях. В любой​​ «Вид» и пиктограмму​​ решения.​​ записывается следующий код:​ как и в​​ Возвращаются на исходную​ ​ объектами.​​При редактировании макроса можно​

​Разработчик​ = True»​Когда все настройки выполнены,​Если вы запустите каждый​ в диалоговом окне​ ячейки с аргументами​:​ Макросы — Выполнить​ макрос автоматически выполнял​

​ книге Excel мы​ «Макросы».​Все действия осуществляются на​

​Sub program()​ других версиях, наряду​ пиктограмму. Нажимают на​Следующее понятие — свойства.​ немного изучить язык​нажмите кнопку​​Добавим также команду «Application.Calculation​ жмем на кнопку​ процесс отдельно, вы​​ их легче найти​

​ (с суммой, для​Перетащите ее к себе​​(Tools — Macro -​​ все действия, которые,​ можем создать любое​​Автор: Наира​​ стандартном листе в​x= Cells(1, 1).Value (эта​ с уже приведенной​ «Запись макроса». Это​

​ Они являются необходимой​

​ программирования Visual Basic.​Запись макроса​ = xlCalculationManual» вначале​ «OK».​ можете быстро просмотреть​ с короткими и​ которой надо посчитать​

• ​ на панель инструментов​ Macros — Run)​ например, Вы делаете​​ количество программных модулей​​Всем нам приходится -​​ Excel. Резервируются свободные​ команда присваивает x​ конструкцией Do While​ действие означает завершение​
• ​ характеристикой любого объекта.​Чтобы изменить макрос, на​.​​ кода, а в​​После этого, все ваши​​ результаты для проверки​​ содержательными названиями. Система​

​ НДС) как в​​ и затем щелкните​

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

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

​ Например, для Range​ вкладке​Если необходимо, заполните поля​ конце кода дописываем​ действия в данной​ точности их выполнения.​ VBA предоставляет вам​ случае с обычной​ по ней правой​ кнопки​ отчета для руководства​ наши макросы. Один​ чаще — повторять​ данных по месяцу,​ с координатами (1,​Рассмотрим программу, которая создаст​Далее:​ — это Value​разработчик​Имя макроса​

​ «Application.Calculation = xlCalculationAutomatic».​ книге (файле) Excel​Если нельзя разбить длинный​ возможность указать описание​ функцией:​ кнопкой мыши. В​Макросы (Macros)​​ компании. Поэтому мы​​ модуль может содержать​ одни и те​

​ году, названию компании-потребителя,​ 1))​ столбец. В каждой​​вновь переходят на строку​​ или Formula.​​нажмите кнопку Макросы​​,​ Этим мы вначале​ будут записываться в​​ макрос на короткие​​ к имени. Обязательно​Макросы позволяют существенно расширить​ контекстом меню можно​на вкладке​ переходим ко второму​​ любое количество макросов.​​ же действия и​​ сумме издержек, их​​If x>0 Then Cells(1,​

​ его ячейке будут​ «Макросы»;​Методы — это команды,​ , выберите имя​Сочетание клавиш​ макроса отключаем автоматический​ макрос до тех​

planetaexcel.ru

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

​ приложения, а требуется​ используйте ее.​ возможности в программе​ назначить кнопке макрос,​Разработчик (Developer)​ способу создания макросов,​ Доступ ко всем​ операции в Excel.​ уровня, товарооборота. Так​ 1).Value = 1​ записаны квадраты номера​

​в списке выбирают «Макрос​ показывающие, что требуется​ макроса и нажмите​и​ пересчет результата после​ пор, пока вы​ проверить его функциональность​

​Имя макроса обязательно должно​ Excel. Они автоматизируют​ выбрать другой значок​или нажав ALT+F8.​ а именно…​ модулям осуществляется с​ Любая офисная работа​ как количество компаний​If x=0 Then Cells(1,​ соответствующей строки. Использование​ 1»;​ сделать. При написании​ кнопку​Описание​ каждого изменения ячеек,​

​ сами не остановите​ пошагово («отладкой»). Нажмите​ начинаться с букв​ рабочие процессы и​ и имя:​Сохранить в…​Макрорекордер​

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

​ помощью окна Project​ предполагает некую «рутинную​ (обществ), относительно которых​ 1).Value = 0​ конструкции For позволит​нажимают «Выполнить» (то же​ кода в VBA​изменить​, а затем нажмите​ а в конце​ запись.​ клавишу F8 каждый​

​ и не может​ берут большую часть​Кнопка на панели быстрого​- здесь задается​- это небольшая​ Explorer в левом​ составляющую» — одни​ составляется отчет, не​If x​ записать ее очень​ действие запускается начатием​ их необходимо отделять​

​. Откроется редактор Visual​ кнопку​ макроса – включаем.​

1. ​Для примера, запишем простейшее​ раз, когда вы​
2. ​ содержать пробелы, символы​ рутинной работы пользователя​ доступа в Excel​
3. ​ место, куда будет​ программа, встроенная в​ верхнем углу редактора​ и те же​
4. ​ зафиксировано, ячейки для​End Sub.​ коротко, без использования​ сочетания клавиш «Ctrl+hh»).​ от объекта точкой.​ Basic.​OK​ Таким образом, Excel​

​ арифметическое действие: сложение​ хотите перейти к​ или знаки препинания.​ на себя. Просто​ 2007 и новее​ сохранен текст макроса,​ Excel, которая переводит​ (если его не​ еженедельные отчеты, одни​ внесения значений по​Остается запустить макрос и​ счетчика.​

​В результате происходит действие,​

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

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

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

​Щелкните правой кнопкой мыши​ т.е. набор команд​ любое действие пользователя​ видно, нажмите CTRL+R).​ и те же​ итогам и ФИО​ получить в «Эксель»​Сначала нужно создать макрос,​ которое было осуществлено​ показано в дальнейшем,​ как в нем​ макроса.​ один раз, а​ (=C4+C5+C6).​

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

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

​ очень часто при​ выглядят записанные действия.​Выполните действия, которые нужно​ не будет его​После этого, жмем на​ программы останавливается, когда​ больше букв, цифр​ труда возрастет в​ доступа в левом​ которых и состоит​ VBA и записывает​ нескольких типов для​ поступивших данных, заполнение​ резервируют. Рабочему листу​ аргумента.​ Далее записываем сам​ макроса.​ программировании в «Эксель»​

​ Возможно, часть кода​ автоматизировать, например ввод​ постоянно пересчитывать, чем​ кнопку «Остановить запись».​ он видит ошибку.​ или нижнее подчеркивание,​ десятки раз!​ верхнем углу окна​ макрос.:​

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

​ получившуюся команду в​ разных ситуаций:​ однообразных таблиц или​ присваивается новое название.​Как вы уже могли​ код. Считаем, что​Имеет смысл увидеть, как​ используют команду Cells(1,1).Select.​ будет понятной.​ стандартного текста или​ сэкономит время.​ Эта кнопка преобразовалась​ Вы можете исправить​ но максимальная длина​Вам даже не нужно​ Excel и выберите​Эта книга​ программный модуль. Если​Обычные модули​ бланков и т.д.​ Например, «Օтчет».​ заметить, программировать в​ нас интересуют значения​ выглядит код. Для​ Она означает, что​

​Измените код, закройте редактор​ заполнение столбца данных.​Продвинутые пользователи могут выполнять​ из кнопки «Запись​ ошибку, которую легко​ имени составляет 80​ быть программистом и​ команду​- макрос сохраняется​ мы включим макрорекордер​- используются в​ Использование макросов и​Для написания программы автоматического​ самом известном табличном​ для 10 ячеек.​ этого вновь переходят​

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

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

​ в модуль текущей​ на запись, а​ большинстве случаев, когда​ пользовательских функций позволяет​ заполнения шаблона, необходимо​ процессоре Microsoft не​ Код выглядит следующим​ на строку «Макросы»​ с координатами (1,1)​

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

​ запустите макрос повторно.​Разработчик​ и оптимизацию записанных​ записи.​ «отладки» или записать​Абсолютный адрес ячейки –​ «VBA» чтобы создавать​ (Customise Quick Access​ книги и, как​ затем начнем создавать​ речь идет о​

​ автоматизировать эти операции,​ выбрать обозначения. Они​ так уж сложно.​ образом.​ и нажимают «Изменить»​

​ т.е. A1.​ Посмотрите, что произойдет.​щелкните​ макросов, но и​Для того, чтобы проверить,​ по-новому.​ это точное местонахождение​ свои макро-программы с​ Toolbar)​ следствие, будет выполнятся​ свой еженедельный отчет,​ макросах. Для создания​ перекладывая монотонную однообразную​ будут использоваться для​ Особенно, если научиться​For i = 1​ или «Войти». В​

exceltable.com

​Вместе с ней нередко​

Время на прочтение
7 мин

Количество просмотров 312K

Приветствую всех.

В этом посте я расскажу, что такое VBA и как с ним работать в Microsoft Excel 2007/2010 (для более старых версий изменяется лишь интерфейс — код, скорее всего, будет таким же) для автоматизации различной рутины.

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

Еще при помощи Visual Studio Tools for Office можно писать макросы на C# и также встраивать их. Спасибо, FireStorm.

Сразу скажу — писать на других языках (C++/Delphi/PHP) также возможно, но требуется научится читать, изменять и писать файлы офиса — встраивать в документы не получится. А интерфейсы Microsoft работают через COM. Чтобы вы поняли весь ужас, вот Hello World с использованием COM.

Поэтому, увы, будем учить Visual Basic.

Чуть-чуть подготовки и постановка задачи

Итак, поехали. Открываем Excel.

Для начала давайте добавим в Ribbon панель «Разработчик». В ней находятся кнопки, текстовые поля и пр. элементы для конструирования форм.

Появилась вкладка.

Теперь давайте подумаем, на каком примере мы будем изучать VBA. Недавно мне потребовалось красиво оформить прайс-лист, выглядевший, как таблица. Идём в гугл, набираем «прайс-лист» и качаем любой, который оформлен примерно так (не сочтите за рекламу, пожалуйста):

То есть требуется, чтобы было как минимум две группы, по которым можно объединить товары (в нашем случае это будут Тип и Производитель — в таком порядке). Для того, чтобы предложенный мною алгоритм работал корректно, отсортируйте товары так, чтобы товары из одной группы стояли подряд (сначала по Типу, потом по Производителю).

Результат, которого хотим добиться, выглядит примерно так:

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

Кодим

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

И вот мы в среде разработки VB. Также её можно вызвать из контекстного меню командой «Исходный текст»/«View code».

Перед вами окно с заглушкой процедуры. Можете его развернуть. Код должен выглядеть примерно так:

Sub FormatPrice()End Sub

Напишем Hello World:

Sub FormatPrice()
    MsgBox "Hello World!"
End Sub

И запустим либо щелкнув по кнопке (предварительно сняв с неё выделение), либо клавишей F5 прямо из редактора.

Тут, пожалуй, следует отвлечься на небольшой ликбез по поводу синтаксиса VB. Кто его знает — может смело пропустить этот раздел до конца. Основное отличие Visual Basic от Pascal/C/Java в том, что команды разделяются не ;, а переносом строки или двоеточием (:), если очень хочется написать несколько команд в одну строку. Чтобы понять основные правила синтаксиса, приведу абстрактный код.

Примеры синтаксиса

' Процедура. Ничего не возвращает
' Перегрузка в VBA отсутствует
Sub foo(a As String, b As String)
    ' Exit Sub ' Это значит "выйти из процедуры"
    MsgBox a + ";" + b
End Sub' Функция. Вовращает Integer
Function LengthSqr(x As Integer, y As Integer) As Integer
    ' Exit Function
    LengthSqr = x * x + y * y
End FunctionSub FormatPrice()
    Dim s1 As String, s2 As String
    s1 = "str1"
    s2 = "str2"
    If s1 <> s2 Then
        foo "123", "456" ' Скобки при вызове процедур запрещены
    End IfDim res As sTRING ' Регистр в VB не важен. Впрочем, редактор Вас поправит
    Dim i As Integer
    ' Цикл всегда состоит из нескольких строк
    For i = 1 To 10
        res = res + CStr(i) ' Конвертация чего угодно в String
        If i = 5 Then Exit For
    Next iDim x As Double
    x = Val("1.234") ' Парсинг чисел
    x = x + 10
    MsgBox xOn Error Resume Next ' Обработка ошибок - игнорировать все ошибки
    x = 5 / 0
    MsgBox xOn Error GoTo Err ' При ошибке перейти к метке Err
    x = 5 / 0
    MsgBox "OK!"
    GoTo ne

On Error GoTo 0 ' Отключаем обработку ошибок

    ' Циклы бывает, какие захотите
    Do While True
        Exit DoLoop 'While True
    Do 'Until False
        Exit Do
    Loop Until False
    ' А вот при вызове функций, от которых хотим получить значение, скобки нужны.
    ' Val также умеет возвращать Integer
    Select Case LengthSqr(Len("abc"), Val("4"))
    Case 24
        MsgBox "0"
    Case 25
        MsgBox "1"
    Case 26
        MsgBox "2"
    End Select' Двухмерный массив.
    ' Можно также менять размеры командой ReDim (Preserve) - см. google
    Dim arr(1 to 10, 5 to 6) As Integer
    arr(1, 6) = 8Dim coll As New Collection
    Dim coll2 As Collection
    coll.Add "item", "key"
    Set coll2 = coll ' Все присваивания объектов должны производится командой Set
    MsgBox coll2("key")
    Set coll2 = New Collection
    MsgBox coll2.Count
End Sub

Грабли-1. При копировании кода из IDE (в английском Excel) есь текст конвертируется в 1252 Latin-1. Поэтому, если хотите сохранить русские комментарии — надо сохранить крокозябры как Latin-1, а потом открыть в 1251.

Грабли-2. Т.к. VB позволяет использовать необъявленные переменные, я всегда в начале кода (перед всеми процедурами) ставлю строчку Option Explicit. Эта директива запрещает интерпретатору заводить переменные самостоятельно.

Грабли-3. Глобальные переменные можно объявлять только до первой функции/процедуры. Локальные — в любом месте процедуры/функции.

Еще немного дополнительных функций, которые могут пригодится: InPos, Mid, Trim, LBound, UBound. Также ответы на все вопросы по поводу работы функций/их параметров можно получить в MSDN.

Надеюсь, что этого Вам хватит, чтобы не пугаться кода и самостоятельно написать какое-нибудь домашнее задание по информатике. По ходу поста я буду ненавязчиво знакомить Вас с новыми конструкциями.

Кодим много и под Excel

В этой части мы уже начнём кодить нечто, что умеет работать с нашими листами в Excel. Для начала создадим отдельный лист с именем result (лист с данными назовём data). Теперь, наверное, нужно этот лист очистить от того, что на нём есть. Также мы «выделим» лист с данными, чтобы каждый раз не писать длинное обращение к массиву с листами.

Sub FormatPrice()
    Sheets("result").Cells.Clear
    Sheets("data").Activate
End Sub

Работа с диапазонами ячеек

Вся работа в Excel VBA производится с диапазонами ячеек. Они создаются функцией Range и возвращают объект типа Range. У него есть всё необходимое для работы с данными и/или оформлением. Кстати сказать, свойство Cells листа — это тоже Range.

Примеры работы с Range

Sheets("result").Activate
Dim r As Range
Set r = Range("A1")
r.Value = "123"
Set r = Range("A3,A5")
r.Font.Color = vbRed
r.Value = "456"
Set r = Range("A6:A7")
r.Value = "=A1+A3"

Теперь давайте поймем алгоритм работы нашего кода. Итак, у каждой строчки листа data, начиная со второй, есть некоторые данные, которые нас не интересуют (ID, название и цена) и есть две вложенные группы, к которым она принадлежит (тип и производитель). Более того, эти строки отсортированы. Пока мы забудем про пропуски перед началом новой группы — так будет проще. Я предлагаю такой алгоритм:

1. Считали группы из очередной строки.
2. Пробегаемся по всем группам в порядке приоритета (вначале более крупные)
   1. Если текущая группа не совпадает, вызываем процедуру AddGroup(i, name), где i — номер группы (от номера текущей до максимума), name — её имя. Несколько вызовов необходимы, чтобы создать не только наш заголовок, но и всё более мелкие.
3. После отрисовки всех необходимых заголовков делаем еще одну строку и заполняем её данными.

Для упрощения работы рекомендую определить следующие функции-сокращения:

Function GetCol(Col As Integer) As String
    GetCol = Chr(Asc("A") + Col)
End FunctionFunction GetCellS(Sheet As String, Col As Integer, Row As Integer) As Range
    Set GetCellS = Sheets(Sheet).Range(GetCol(Col) + CStr(Row))
End FunctionFunction GetCell(Col As Integer, Row As Integer) As Range
    Set GetCell = Range(GetCol(Col) + CStr(Row))
End Function

Далее определим глобальную переменную «текущая строчка»: Dim CurRow As Integer. В начале процедуры её следует сделать равной единице. Еще нам потребуется переменная-«текущая строка в data», массив с именами групп текущей предыдущей строк. Потом можно написать цикл «пока первая ячейка в строке непуста».

Глобальные переменные

Option Explicit ' про эту строчку я уже рассказывал
Dim CurRow As Integer
Const GroupsCount As Integer = 2
Const DataCount As Integer = 3

FormatPrice

Sub FormatPrice()
    Dim I As Integer ' строка в data
    CurRow = 1
    Dim Groups(1 To GroupsCount) As String
    Dim PrGroups(1 To GroupsCount) As String

"data").Activate
    I = 2
    Do While True
        If GetCell(0, I).Value = "" Then Exit Do
        ' ...
        I = I + 1
    Loop
End Sub

Теперь надо заполнить массив Groups:

На месте многоточия

Dim I2 As Integer
For I2 = 1 To GroupsCount
    Groups(I2) = GetCell(I2, I)
Next I2
' ...
For I2 = 1 To GroupsCount ' VB не умеет копировать массивы
    PrGroups(I2) = Groups(I2)
Next I2
I =  I + 1

И создать заголовки:

На месте многоточия в предыдущем куске

For I2 = 1 To GroupsCount
    If Groups(I2) <> PrGroups(I2) Then
        Dim I3 As Integer
        For I3 = I2 To GroupsCount
            AddHeader I3, Groups(I3)
        Next I3
        Exit For
    End If
Next I2

Не забудем про процедуру AddHeader:

Перед FormatPrice

Sub AddHeader(Ty As Integer, Name As String)
    GetCellS("result", 1, CurRow).Value = Name
    CurRow = CurRow + 1
End Sub

Теперь надо перенести всякую информацию в result

For I2 = 0 To DataCount - 1
    GetCellS("result", I2, CurRow).Value = GetCell(I2, I)
Next I2

Подогнать столбцы по ширине и выбрать лист result для показа результата

После цикла в конце FormatPrice

Sheets("Result").Activate
Columns.AutoFit

Всё. Можно любоваться первой версией.

Некрасиво, но похоже. Давайте разбираться с форматированием. Сначала изменим процедуру AddHeader:

Sub AddHeader(Ty As Integer, Name As String)
    Sheets("result").Range("A" + CStr(CurRow) + ":C" + CStr(CurRow)).Merge
    ' Чтобы не заводить переменную и не писать каждый раз длинный вызов
    ' можно воспользоваться блоком With
    With GetCellS("result", 0, CurRow)
        .Value = Name
        .Font.Italic = True
        .Font.Name = "Cambria"
        Select Case Ty
        Case 1 ' Тип
            .Font.Bold = True
            .Font.Size = 16
        Case 2 ' Производитель
            .Font.Size = 12
        End Select
        .HorizontalAlignment = xlCenter
    End With
    CurRow = CurRow + 1
End Sub

Уже лучше:

Осталось только сделать границы. Тут уже нам требуется работать со всеми объединёнными ячейками, иначе бордюр будет только у одной:

Поэтому чуть-чуть меняем код с добавлением стиля границ:

Sub AddHeader(Ty As Integer, Name As String)
    With Sheets("result").Range("A" + CStr(CurRow) + ":C" + CStr(CurRow))
        .Merge
        .Value = Name
        .Font.Italic = True
        .Font.Name = "Cambria"
        .HorizontalAlignment = xlCenterSelect Case Ty
        Case 1 ' Тип
            .Font.Bold = True
            .Font.Size = 16
            .Borders(xlTop).Weight = xlThick
        Case 2 ' Производитель
            .Font.Size = 12
            .Borders(xlTop).Weight = xlMedium
        End Select
        .Borders(xlBottom).Weight = xlMedium ' По убыванию: xlThick, xlMedium, xlThin, xlHairline
    End With
    CurRow = CurRow + 1
End Sub

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

В начале FormatPrice

Dim I As Integer ' строка в  data
CurRow = 0 ' чтобы не было пропуска в самом начале
Dim Groups(1 To GroupsCount) As String

В цикле расстановки заголовков

If Groups(I2) <> PrGroups(I2) Then
    CurRow = CurRow + 1
    Dim I3 As Integer

В точности то, что и хотели.

Надеюсь, что эта статья помогла вам немного освоится с программированием для Excel на VBA. Домашнее задание — добавить заголовки «ID, Название, Цена» в результат. Подсказка: CurRow = 0 CurRow = 1.

Файл можно скачать тут (min.us) или тут (Dropbox). Не забудьте разрешить исполнение макросов. Если кто-нибудь подскажет человеческих файлохостинг, залью туда.

Спасибо за внимание.

Буду рад конструктивной критике в комментариях.

UPD: Перезалил пример на Dropbox и min.us.

UPD2: На самом деле, при вызове процедуры с одним параметром скобки можно поставить. Либо использовать конструкцию Call Foo(«bar», 1, 2, 3) — тут скобки нужны постоянно.

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

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

Что такое макрос и для чего он применяется

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

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

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

Инструкции, которые передаются макросу, содержат макрооператоры – конкретные команды, которые офисному пакету нужно выполнить. Ряд из них являются специфическими, но большая часть соответствует командам из главного меню. Это делается для того, чтобы сделать процесс создания макросов более дружелюбным для пользователя.

Давайте приведем один пример. Любое приложение, независимо от используемой операционной системы, содержит кнопку «Закрыть». Если мы хотим сделать это через макрос, нам нужно ввести в среду разработки команду ActiveWindow.Close. Видим, что по названиям операторов можно много чего понять, поскольку все они пишутся на английском языке. Это также упрощает задачу пользователя, который знает английский язык.

Бояться макросов не нужно, поскольку VBA – очень простой язык программирования. Большую часть действий можно запрограммировать, даже не написав ни строчки кода. Достаточно просто эти действия записать один раз. При этом важно помнить, что редактор кода значительно функциональнее по сравнению с визуальными методами написания макросов.

Как создать новый макрос в Excel

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

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

Способ 1. Автоматический запуск макроса

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

1. Найти меню «Файл» и сделать по нему левый клик мышью.
2. Далее появляется экран с набором подпунктов. Нам нужно выбрать меню «Параметры».
3. После этого находим пункт «Настройка ленты» и ищем в нем флажок, активирующий вкладку «Разработчик».
4. Подтверждаем свои действия путем нажатия клавиши «ОК».

После этого мы увидим вкладку «Разработчик» в нашей программе. Делаем переход по ней. Перед нами появляется большое количество инструментов разработчика. Из всего этого ассортимента нас интересует группа «Код». Там находится маленькая кнопка «Записать макрос», после клика по которой осуществляется непосредственная запись этой программы.

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

1. Имя макроса. Допустимо использование какого-угодно имени за исключением того, которое начинается с числа или символа. При этом нельзя в качестве имени использовать больше одного слова.
2. Комбинация клавиш. Это некий пусковой крючок для макроса. Он используется для того, чтобы включить макрос. Все горячие клавиши начинаются с клавиши Ctrl, а вторую можно настроить самостоятельно. Например, можно использовать горячую клавишу r. Также возможен ввод большой буквы. Для этого необходимо воспользоваться клавишей Shift, которая автоматически добавляется в комбинацию горячих клавиш.
3. Место хранения. По умолчанию предусмотрен вариант, когда макрос применяется к текущей книге. Тем не менее, пользователь может выбрать новую или создать собственную книгу для макросов.
4. Описание. При желании пользователь может в нескольких предложениях описать, что будет делать макрос. Это будет особенно полезно, если одной и той же книгой пользуются несколько человек.

После выполнения всех действий нужно нажать клавишу ОК, тем самым подтвердив изменения. Теперь все действия, совершаемые пользователем, будут автоматически записываться в макрос. Это будет продолжаться ровно до тех пор, пока запись программы не будет остановлена. Значительно проще разобрать это на реальном примере. Давайте сделаем программку, которая будет умножать содержимое двух ячеек. Для этого нужно запустить запись макроса, ввести в ячейку формулу (в нашем случае это =B2*B3), нажать клавишу Enter, после чего остановить запись. Кнопка остановки записи макроса находится на вкладке «Разработчик» в группе «Код».

Запуск выполнения макроса

Как же проверить, работает ли наш макрос? Для этого нужно выполнить следующие действия:

1. Открыть вкладку «Разработчик». Там в самой левой части есть кнопка «Макросы», по которой нужно сделать левый клик мышью один раз. Кроме этого, пользователь может открыть аналогичную опцию путем нажатия горячих клавиш Alt + F8.
2. После этого у нас откроется окно настройки макросов. Нужно выбрать тот, который мы только что создали, и нажать на кнопку «Выполнить». Этот же результат можно получить, если нажать сочетание клавиш, которое мы назначили для макроса раньше.
3. О том, что макрос работает, мы можем судить по действиям программы. Если они повторяют те, которые были сделаны раньше, значит все ОК.

Таким способом можно проверить любой макрос. Но что делать, если оказывается, что он работает не совсем так, как нам нужно было?

Корректировка макроса

Если в ходе исполнения макроса появляются какие-то проблемы, их можно исправить. Самая распространенная проблема, по которой команды не выполняются, как надо – ошибки пользователя на этапе первичной записи команд. Чтобы отредактировать созданный макрос, нужно выполнить следующие действия.

1. Открыть окошко макросов путем нажатия на ту же кнопку, что была описана выше или же воспользоваться комбинацией клавиш.
2. Выбираем наш макрос. Находим кнопку «Изменить», которая находится справа от него. Делаем единичный левый клик мышью по ней.
3. После этого откроется редактор Visual Basic. Правки придется вносить в код, поэтому если навыков программирования нет, нужно быть очень внимательным при записи макроса.

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

Далее следуют команды, которые выполняют конкретные действия. Например, номер ячейки мы получаем с помощью оператора Range. В нашем примере, мы получаем ячейку B2 с помощью команды Range(“B2″).Select. Это действие аналогично выбору ячейки левой кнопкой мышки. Значение ячейки, которая выбрана на данный момент указывается с помощью оператора ActiveCell.FormulaR1C1.

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

Range(«B4»).Select

ActiveCell.FormulaR1C1 = «3»

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

Но это уже лирическое отступление. Нам еще осталось совершить одно действие – изменить первоначальное выражение, которое касалось ячейки D2, на это: ActiveCell.FormulaR1C1 = «=RC[-2]*R[1]C[-2]*R[2]C[-2]»

Внимание! Видим, что адреса в ячейках в данном примере записываются, как R1C1.

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

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

Также можно ускорить работу макроса путем добавления команды Application.ScreenUpdating = False. После этого на экране не будут показываться те промежуточные шаги, которые выполняет макрос, лишь конечный результат. Если же нужно, чтобы отображение на экране было вновь включено, тогда нужно заменить False на True.

Способ 2. Создание макроса в ручном режиме

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

1. Перейти во вкладку «Разработчик» и нажать на кнопку «Visual Basic». Она находится в самой левой части панели инструментов в этой вкладке.
2. Далее появится окно, которое мы уже знаем по предыдущему разделу.
3. Весь код пишется здесь.

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

Как изменять существующие макросы

Детали о том, как изменять существующие макросы, описывались выше. В целом логика остается той же самой, за тем лишь исключением, что коррекция макросов –  это точечные изменения (например, отредактировать ячейку, если случайно была выбрана неправильно). В то время как изменение –  более фундаментальное редактирование, включая добавление новых строк кода и так далее.

Заключение

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