Куда вставлять макрос в excel

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

Рассмотрим два примера:

Ищем и используем команду
Ищем и используем функцию

1. Ищем и используем команду

Например, нам необходима команда, которая бы вставляла в выделенные ячейки цифру «1». Запускаем поисковик, набираем поисковую фразу, получаем результаты, начинаем просматривать, находим код примерно в таком виде:

Sub Вставка1()
    Dim q As Object
    On Error Resume Next
    Set q = Cells
    For Each q In Selection
        q = 1
    Next q
End Sub

Выделяем данный код (без нумерации строк, начиная со слова Sub) и нажимаем Ctrl+C. Переходим в свою рабочую книгу MS Excel и нажимаем сочетание клавиш Alt+F11, у вас откроется окно редактора VBA:

В левом окне «Project — VBA Project» выбираем (щелкаем мышкой) нашу рабочую книгу, в которую необходимо вставить макрос, например, «VBAProject (Книга2)»:

Я не вижу окна «Project — VBA Project».

В пункте меню «Insert» выбираем «Module»:

В левом окне «Project — VBA Project» у вас должна появиться новая папка «Modules» и в ней новый объект «Module1»:

Переходим курсором в правое «Большое» поле для ввода и нажимаем Ctrl+V, скопированный макрос вставиться в модуль:

У меня в коде «????????«

После чего закрываем редактор VBA и возвращаемся в рабочую книгу.

Если вы работаете в MS Excel 2007, 2010 или 2013, вам необходимо будет сохранить вашу рабочую книгу как «Книга Excel с поддержкой макросов (.xlsm)»:

В MS Excel 2003 достаточно будет просто сохранить файл.

Чтобы выполнить скопированный в книгу макрос выделяем ячейки, в которые необходимо вставить «1», нажимаем в меню «Вид» кнопку «Макросы» и в выпавшем списке выбираем пункт «Макросы» или нажимаем сочетание клавиш Alt+F8:

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

Макрос выполнится — в выделенные ячейки вставиться «1»:

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

Макросы в MS Excel можно вставлять в следующие места:

• В Модуль, обычно вставляют код макросов, запуск которых будет производится по нажатию кнопки пользователем (как, например, в нашем случае) или код функций (формул);
• В Рабочий лист, обычно вставляют код макросов, запуск которых должен происходить автоматически в зависимости от действий пользователя или изменения данных в листе (поменялись данный, макрос выполнился);
• В Рабочую книгу, обычно вставляют код макросов, запуск которых должен происходить автоматически в зависимости от действий, производимых над книгой (файлом). Например, макрос, который запускается при открытии или закрытии книги, или при ее сохранении;
• Так же макросы могут быть частью пользовательской формы.

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

Чтобы вставить код в Рабочий лист, в левом окне редактора VBA выберите соответствующий лист, щелкните по нему два раза левой кнопкой мышки, переместите курсор в правое поле ввода и вставьте код.

Для вставки кода в Книгу, выберите «ЭтаКнига»:

Давайте потренируемся. Вставьте код опубликованный ниже в «Лист1».

Private Sub Worksheet_Change(ByVal Target As Range)
    On Error GoTo a
    If Target = 2 Then
        VBA.MsgBox ("Ячейка " & Target.Address & " = 2")
    End If
a:
    Exit Sub
End Sub

Данный макрос выводит информационное сообщение если вы введете в любую ячейку листа «2».

Вернитесь в рабочую книгу, перейдите в «Лист1» и введите в ячейку «А1» цифру «2» и нажмите Enter, после чего у вас должно появиться следующее сообщение:

Если вы видите это сообщение, то вы все сделали правильно. Если нет, то вы вставили код куда-то не туда, повторите попытку.

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

2. Ищем и используем функцию

Находим в интернете VBA код функции, которая подсчитывает, например, количество слов в ячейке:

Public Function КолСловВЯчейке(Ячейка As Range)
    Dim q As Variant
    Application.Volatile
    q = VBA.Split(Application.WorksheetFunction.Trim(Ячейка.Value), " ")
    КолСловВЯчейке = UBound(q) + 1
End Function

Копируем код, нажимаем сочетание клавиш Alt+F11, откроется редактор VBA:

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

Закрываем редактор VBA и переходим в свою рабочую книгу. Создаем новый лист (необязательно) в ячейку A1 вводим текст «мама мыла раму». Встаем в ячейку, в которой хотим получить результат (количество слов), в меню «Формулы» нажимаем кнопку «Вставить функцию»:

В открывшемся окне «Вставка функции» в поле «Категория» выбираем «Определенные пользователем»

В списке доступных функций выбираем «КолСловВЯчейке», нажимаем «ОК»:

Вводим необходимые аргументы и нажимаем «ОК»:

Получаем результат:

Важно:

Если вы не сохраните книгу, в которую вставили макрос как «Книгу с поддержкой макросов», все модули с макросами удаляться и вам придется, потом, повторно проделывать всю эту работу.

Если при вставке макроса в модуль у вас вместо некоторого текста стоят красные знаки «????????«

Это значит, что у вас проблема с кодировкой, которая наблюдается с копированием Кириллического текста из некоторых браузеров. Чтобы победить эту проблему, попробуйте вставить скопированный код в пустой лист MS Excel, как «Текст в кодировке Unicode». Для этого перейдите в книгу MS Excel, выберите или создайте пустой лист, встаньте в ячейку «A1» и нажмите сочетания клавиш Ctrl+Alt+V. Должно будет появиться меню «Специальной вставки», выберите пункт «Текст в кодировке Unicode» и нажмите «OK».

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

После этого, еще раз скопируйте вставленный в лист код, и вставить его уже в модуль.

Если вы не видите в редакторе VBA окна «Project — VBA Project», перейдите во вкладку меню «View» и в списке выберите пункт «Project Explorer» или нажмите сочетание клавиш Ctrl+R:

Чтобы автоматизировать управление формы или ActiveX формы, с помощью следующих экономий:

• Выполнение действия или операции, когда пользователь щелкает форму, назначив ему макрос.

• Запустите Visual Basic для приложений (VBA) для обработки событий, которые происходят, когда пользователь взаимодействует с ActiveX управления.

Дополнительные сведения о создании макроса см. в теме «Создание и удаление макроса».

Добавление и изменение макроса для управления формы

1. Щелкните правой кнопкой мыши нужный макрос и выберите «Назначить макрос».

   Появится диалоговое окно «Назначение макроса».

2. Чтобы указать расположение существующего макроса, выберите его расположение в поле «Макрос» одним из следующих образом:

   • Чтобы найти макрос во всех открытых книгах, выберите «Все открытые книги».

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

   • Чтобы ограничить поиск макроса книгой, содержаной текущий книгу, выберите «Эта книга».

   • Чтобы ограничить поиск макроса определенной книгой, выберите ее из списка доступных имен открытых книг.

3. Выполните одно из указанных ниже действий.

   Назначение макроса    Выполните одно из указанных ниже действий.

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

   • Назначение существующего макроса    Дважды щелкните макрос в списке или введите его имя в поле «Имя макроса».

   • Создание макроса    Нажмите кнопку «Создать» и в редакторе Visual Basic ввести новый макрос.

     Дополнительные сведения о том, как писать макрос, см. в Visual Basic справке.

     Изменение назначенного макроса    Выполните одно из указанных ниже действий.

   • Изменение назначенного макроса    Щелкните имя макроса в поле «Имя макроса» и нажмите кнопку «Изменить».

   • Назначение другого существующего макроса    Дважды щелкните макрос в списке или введите его имя в поле «Имя макроса».

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

1. Если вкладка Разработчик недоступна, отобразите ее.

   В Excel 2016, 2013 и 2010:

   1. Щелкните Файл > Параметры > Настроить ленту.

   2. В окне «Настройка ленты»выберите поле «Разработчик» и нажмите кнопку «ОК».

   В Excel 2007

   1. Нажмите кнопку Microsoft Office , а затем — кнопку Параметры Excel.

   2. В категории «Популярные» в области «Топ параметров работы с Excel»выберите на ленте вкладку «Разработчик» и нажмите кнопку «ОК».

2. Чтобы изменить элемент ActiveX, убедитесь, что выбран режим конструктора. На вкладке Разработчик в группе Элементы управления нажмите кнопку Режим конструктора .

3. Выберем его.

   Дополнительные сведения см. в подменю «Выбор и отбирать элементы управления» на сайте.

4. на вкладке «Разработчик» в группе «Элементы управления» нажмите кнопку » «.

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

5. В редакторе Visual Basic напишите новый макрос или измените существующий.

   Дополнительные сведения о том, как писать макрос, см. в Visual Basic справке.

6. Завершив ввод макроса, нажмите кнопку «Закрыть» и «Вернуться в Microsoft Excel» в меню «Файл» Visual Basic редакторе.

7. Завершив разработку элементов управления, на вкладке «Разработчик» в группе «Элементы управления» отключите режим .

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

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

Как записать макрос

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

• вручную;
• автоматически.

Для того чтобы создать макрос автоматически, достаточно записать определенный порядок действий через Excel. При этом их необходимо выполнять в данный момент. Когда запись будет окончена, ее можно будет применить к другим таблицам, нажав на воспроизведение. Главное преимущество данного способа – нет необходимости учить код, чтобы применять его на практике. Однако такой алгоритм не будет обладать какой-либо гибкостью, его можно будет применять только в определенных ситуациях. Процесс автоматической записи макросов:

1. Изначально необходимой зайти “Центр управления безопасностью” через главное меню программы.
2. Зайти во вкладку “Параметры макросов”.
3. Активировать команду “Включить все макросы”.

1. Перейти на вкладку “Разработчик”, которая находится на основной панели инструментов.
2. Нажать на кнопку “Запись макроса” (она находится в панели инструментов под названием “Код”).

Далее откроется окно с настройками алгоритма, где нужно придумать имя макроса, установить комбинацию клавиш для его запуска. После завершения настройки необходимо подтвердить заданные параметры кнопкой “ОК”.

Важно! Для открытия панели с готовыми макросами нужно нажать комбинацию клавиш Alt+F8. Она вызывает окно с уже созданными алгоритмами, из которых необходимо выбрать желаемый вариант.

Как добавить готовый макрос в рабочую книгу

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

1. Изначально необходимо найти желаемую команду в интернете. После этого выделить полученный код.
2. Запустить рабочую книгу, активировать комбинацию клавиш Alt+F
3. Перед пользователем должно открыться окно VBA.

1. По левую сторону необходимо найти окно “Project — VBA Project”. Из появившегося списка нужно выбрать рабочую книгу.
2. Открыть меню “Insert”, активировать функцию “Module”.
3. После этого в левом окне появится новая папка под названием “Moduels”.
4. Открыть новый объект внутри созданной паки, в свободное окно вставить скопированный код по комбинации клавиш “Ctrl+V”.

Останется закрыть запущенный редактор, вернуться к рабочей книге.

Важно! Чтобы сохранить готовую таблицу с добавленным макросом в Excel версий 2007, 2010, 2013 годов, нужно выбрать из списка тип файла строку “Книга Excel с поддержкой макросов”.

Как запустить макрос

Существует несколько проверенных способов запуска добавленных или созданных алгоритмов действий в Excel. Самый простой метод – запуск макроса через VBA:

1. Зайти во вкладку “Разработчик” на главной панели с инструментами.
2. Перейти в панель с инструментами “Код”, нажать на кнопку “Макросы”.
3. Из открывшегося окна нужно выбрать требуемый алгоритм с помощью ЛКМ, нажать на кнопку “Выполнить”.

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

1. Необходимо зайти в окно с готовыми или добавленными алгоритмами действий точно так же, как было описано в способе выше.
2. Перейти во вкладку “Параметры” которая расположена в правой части появившегося окна.
3. Откроется еще одно окно, в котором можно настроить алгоритм.

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

Совет! В окне с параметрами есть большое свободное поле снизу, которое имеет название “Описание”. В ней рекомендуется кратко написать, какие действия выполняет данный алгоритм. Это поможет не путаться в созданных макросах при их использовании.

Запуска алгоритма через панель быстрого доступа:

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

1. Из открывшегося списка выбрать функцию “Другие команды”. Должно появиться окно с параметрами Excel.
2. Из списка в левой стороне зайти во вкладку “Выбрать команду”. Нажать на функцию “Макросы”.
3. Далее необходимо выбрать желаемый алгоритм действий.

На панели быстрого доступа перед стрелкой вниз должен появиться произвольный значок выбранного макроса. Его можно изменить через настройки. Чтобы сохранить установленные параметры, необходимо нажать кнопку “ОК”.

Важно! У данного способа есть один недостаток, который важно учитывать перед добавлением кнопки алгоритма действий на панель быстрого доступа. Значок доступа к макросу будет доступен во всех рабочих таблицах. При нажатии на него будет открываться тот документ, куда он был добавлен изначально.

Заключение

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

Введение

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

​Смотрите также​ продано товара.​ ячейку (М6), прописываем​ Открываем меню инструмента​ где и как​ доступ к меню​ свою макропрограмму при​ запустить и выполнить​ диалоговое окно​ Если используется имя​ код. Просмотр записанного​ выполнения макроса, вы​

​ назначить сочетание клавиш​ с диапазоном Excel,​

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

​ ошибки. Для нас​Закрываем редактор, и запускаем​

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

​Скачать пример кнопки сортировки​ следующий код:​ «Вставить». Теперь выбираем​ будет вставлена кнопка​ «Настроить панель», в​ нажатии определенной комбинации​ несколькими способами. Если​Макрос​ макроса, являющееся ссылкой​ кода — отличный​ можете закрыть книгу,​CTRL+Z​ будет выполняться только​

​ важно, чтобы эта​ макрос, как и​ данного макроса. Но,​ позволяют значительно ускорить​Примечание. Такие простые макросы​Sub Макрос 1()​ элемент «кнопка» из​ для запуска макроса.​

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

​ котором необходимо выбрать​ клавиш на клавиатуре.​ еще нет кода​.​

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

​ в прошлый раз.​ это делать не​ работу с документами​ можно создать в​Range(«M6»).Select​ первой группы (такой​В появившемся окне «Назначить​ опцию «Другие команды».​ Что может быть​ макроса или вы​Примечание:​ появиться сообщение об​ на VBA или​Ниже приведены дополнительные сведения​

​ сможете использовать его​ диапазона. Поэтому если​ полезна. Просим вас​ Как видим, вследствие​ обязательно.​ в этом табличном​ автоматическом режиме без​End Sub​ же серый кирпичик).​ макрос объекту» из​ В результате чего​ ее проще?​

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

​Точно так же можно​ Рисуем кнопку. Сразу​ списка доступным макросов​ откроется окно «Параметры​Чтобы присвоить свою комбинацию​ как его написать,​ чем впервые запускать​

​ недопустимое имя макроса..​Пример изменения записанного кода​ макросами в Excel.​

​ в данном экземпляре​ диапазон новую строку,​ и сообщить, помогла​ была добавлена ещё​ жмем на кнопку​ путем автоматизации повторяющихся​ написания VBA-кода, с​ назначить макрос диаграмме,​

​ открывается окно для​ выберите желаемый и​ Excel», к которому​ клавиш для определенного​

​ тогда сначала прочитайте​ записанный макрос, сохраните​В списке​ можно найти в​Задача​ Excel.​

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

​ макрос не будет​ ли она вам,​ одна ячейка с​ «OK».​ действий, записанных в​ помощью инструмента «Запись​ объектам WordArt, SmartAtr.​ назначения макроса: можно​

​ нажмите на кнопку​ можно было получить​ макроса следует сделать​ статью: Как написать​ книгу или создайте​Сохранить в​ статье Начало работы​

​Описание​В списке​ применяться к ней.​ с помощью кнопок​ данными. Она также​После этого, все ваши​ специальный код. Давайте​ макроса».​Для показательного примера создайте​ сделать сразу, а​ ОК.​ доступ и другим​

​ так:​ макрос в Excel​ ее копию, чтобы​выберите книгу, в​

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

​ с VBA в​Изменение параметров безопасности макросов​Сохранить в​Если вам нужно записать​ внизу страницы. Для​ была включена в​ действия в данной​

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

​Теперь нужно назначить кнопку​ путем: «ФАЙЛ»-«Параметры»-«Панель быстрого​Снова выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Макросы».​ на языке программирования​ предотвратить внесение нежелательных​ которой вы хотите​ Excel.​ в Excel​выберите книгу, в​ длинную последовательность задач,​ удобства также приводим​ расчет общей суммы.​ книге (файле) Excel​ макросы в программе​: У меня есть​

​ на рисунке:​Кнопка – автофигура. Переходим​ макросу. Правой кнопкой​

​ доступа». Или щелкнув​
​В появившемся диалоговом окне​

​ VBA.​ изменений. Если вас​ сохранить макрос.​

​Перед записью макросов полезно​Сведения о параметрах безопасности​ которой вы хотите​ советуем вместо этого​ ссылку на оригинал​В случае, если макрос​ будут записываться в​ Excel, и как​ макрос:​Вместо заголовков колонки таблицы​

​ на вкладку «Вставка».​ мышки щелкните по​ правой кнопкой мышки​ «Макрос» выберите желаемую​В данной статье для​ не устраивают результаты​Как правило, макросы сохраняются​ знать следующее:​ макросов и их​ сохранить макрос.​ использовать несколько более​ (на английском языке).​ слишком большой, его​ макрос до тех​ их можно отредактировать.​Private Sub CommandButton1_Click()​ добавим автофигуры, которые​ В меню «Иллюстрации»​ созданной кнопке и​ по любой панели​ макропрограмму из списка​

​ Вас буде приведет​ выполнения макроса, вы​ в​Макрос, записанный для работы​ значении.​Как правило, макросы сохраняются​ мелких макросов.​Для автоматизации повторяющихся задач,​ выполнение может занять​ пор, пока вы​Скачать последнюю версию​ Dim s As​ будут служить кнопками​ выбираем подходящую фигуру.​ в появившемся контекстном​ Excel на любой​ и нажмите на​

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

​ пошаговый пример с​ можете закрыть книгу,​той же книге​ с диапазоном Excel,​Запуск макроса​ в расположении​В макросе могут содержаться​ вы можете записать​ значительное время. Но,​ сами не остановите​ Excel​ String, k As​

​ для сортировки по​ Рисуем. По готовой​ меню выберите опцию​

​ закладке и выбрать​ кнопку «Параметры».​

​ картинками и фрагментом​ не сохраняя ее.​, но если вам​ будет выполняться только​Макросы можно запускать различными​Эта книга​ и задачи, не​ макрос с средство​ путем внесения ручного​ запись.​Макрос можно записать двумя​ Integer, f(10) As​ столбцам таблицы.​ фигуре можно щелкнуть​ «Изменить текст». Удалите​

​ опцию «Настройка панели​

lumpics.ru

Автоматизация задач с помощью средства записи макросов — Excel

​В появившемся диалоговом окне​​ простейшего готового кода​Ниже приведены дополнительные сведения​ нужно, чтобы данный​ для ячеек этого​ способами, например с​, но если вы​ относящиеся к Excel.​ записи макросов в​ изменения в код,​Для примера, запишем простейшее​ способами:​ Integer Dim d(100)​В режиме Visual Basic​ правой кнопкой мыши​ старый и введите​ быстрого доступа».​ «Параметры макроса» в​ VBA.​ о работе с​ макрос был всегда​

​ диапазона. Поэтому если​ помощью сочетания клавиш,​ хотите, чтобы макрос​ Процесс макроса может​ Microsoft Excel. Представьте​ мы можем ускорить​ арифметическое действие: сложение​автоматически;​ s = Cells(1,​ — ALT+F11 в​ и изменить оформление.​ новый текст «Мой​В левом выпадающем списке​ поле ввода «Сочетание​Например, самый простой способ​

​ макросами в Excel.​

​ доступен при работе​ вы добавите в​ графического объекта, панели​ был всегда доступен​ охватывать прочие приложения​ имеют даты в​ процесс. Добавляем команду​ содержимого трёх ячеек​вручную.​ 1) ‘ ввод​ папке Modules вставляем​Кнопка – рисунок. Переходим​ макрос».​ «Выбрать команду из:»​ клавиш: CTRL+» введите​ запустить макрос для​Задача​ в Excel, выберите​ диапазон новую строку,​ быстрого доступа, кнопки​ при работе в​ Office и другие​ форматах случайных и​ «Application.ScreenUpdating = False».​ (=C4+C5+C6).​Воспользовавшись первым вариантом, вы​ натурального числа n​ новый модуль Module1.​ на вкладку «Вставка».​После создания кнопки можно​ выберите опцию «Макросы».​

​ маленькую или большую​ понимания, но сложный​Описание​ вариант Личная книга​ макрос не будет​ или даже при​ Excel, выберите пункт​ программы, которые поддерживают​ вы хотите применить​ Она позволит сохранить​После этого, жмем на​ просто записываете определенные​ = 3 For​ Для этого делаем​ В меню «Иллюстрации»​ ее настроить, изменив​В левом списке элементов​ латинскую букву. И​ для реализации:​

​Включение и отключение макросов​ макросов. Если вы​​ применяться к ней.​​ открытии книги.​ Личная книга макросов.​ Visual Basic для​ ко всем адресам​ вычислительные мощности, а​ кнопку «Остановить запись».​

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

​ действия в программе​ i = 1​

• ​ по папке правый​ выбираем инструмент «Рисунок».​ ее размеры и​ ниже выберите необходимый​ нажмите на кнопку​Выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Макросы».​Узнайте, как включать и​ выберете этот параметр,​Если вам нужно записать​

• ​Изменение макроса​ Если выбрать этот​ приложений (VBA). Например,​ единый формат. Макрос​ значит ускорить работу.​

• ​ Эта кнопка преобразовалась​ Microsoft Excel, которые​ To Len(s) d(i)​ щелчок мышкой и​ Для выбора будут​ положение на листе.​ макрос и нажмите​ ОК.​В появившемся окне «Макрос»​ отключать макросы в​ Excel создаст скрытую​ длинную последовательность задач,​С помощью редактора Visual​ вариант, Excel создаст​ вы можете записать​ сделать это за​

​ Это достигается путем​ из кнопки «Запись​

1. ​ выполняете в данный​​ = Mid(s, i,​​ выбираем: Insert-Module.​​ предложены варианты, которые​​ Для этого снова​​ на кнопку «Добавить».​​Теперь нажмите свою комбинацию​

   ​ из списка всех​

   ​ Excel для Mac.​​ личную книгу макросов​​ советуем вместо этого​​ Basic можно изменять​​ скрытую личную книгу​​ макрос, который сначала​​ вас. Запись макроса,​​ отказа от обновления​​ макроса», после включения​

   

2. ​ момент времени. Потом,​​ 1) If (d(i)​​Делаем двойной щелчок по​ имеются на компьютере.​ щелкните правой кнопкой​ В результате чего​ горячих клавиш для​

   ​ в первую очередь​​Создание, выполнение, изменение или​ Personal.xlsb (если она​ использовать несколько более​ макросы, присоединенные к​ макросов Personal.xlsb (если​ обновляет таблицу в​ применив нужный формат​ экрана во время​ записи.​ можно будет воспроизвести​ Mod 2) =​ Module1 и вводим​Графический объект создан. Теперь​ мышки по кнопке,​ в правом списке​ вызова выбранного макроса.​

3. ​ доступных макросов для​ удаление макроса ​ еще не существует)​​ мелких макросов.​​ книге.​ она еще не​ Excel, а затем​ и затем воспроизводить​​ выполнения вычислительных действий.​​Для того, чтобы проверить,​​ эту запись. Данный​​ 1 Then k​ в него следующий​ нужно сделать его​ а потом нажмите​ элементов появиться кнопка​ Как видно теперь​ данной рабочей книги​Чтобы сэкономить время на​​ и сохранит макрос​​В макросе могут содержаться​Копирование модуля макроса в​ существует) и сохранит​ открывает Outlook для​ макроса при необходимости.​

4. ​ Чтобы возобновить обновление​​ как работает записанный​​ способ очень легкий,​ = k +​ код:Sub Макрос1()​

   ​ «рабочим».​ клавишу Esc на​​ для нового инструмента​​ вашему макросу присвоена​ Excel выберите любой​ выполнении часто повторяющихся​ в нее. Книги​ и задачи, не​ другую книгу​ макрос в ней.​ ее отправки по​Windows MacOS ​ после выполнения макроса,​ макрос, кликаем в​ и не требует​ CInt(d(i)) End If​

5. ​ActiveWorkbook.Worksheets(«Лист1»).Sort.SortFields.Clear​​​​ клавиатуре, чтобы скрыть​ быстрого запуска вашего​ комбинация горячих клавиш​

   ​ понравившийся вам и​ задач, можно записать​ из этой папки​ относящиеся к Excel.​Если книга содержит макрос​В поле​ электронной почте.​При записи макроса все​ в его конце​ том же блоке​ знания кода, но​ Select Case d(i)​

6. ​ActiveWorkbook.Worksheets(«Лист1»).Sort.SortFields.Add Key:=Range(«A2:A6»), _​К примеру, написали макрос​​ контекстное меню. У​​ макроса. Справа от​

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

8. ​ соответствующую последовательность действий​​ автоматически открываются при​​ Процесс макроса может​​ VBA, который нужно​​Описание​​Чтобы записать макрос, следуйте​ ​ необходимые действия записываются​

   ​ пишем команду «Application.ScreenUpdating​

   ​ инструментов «Код» по​​ применение его на​​ Case 0 f(0)​​SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal​​ для выполнения определенной​​ кнопки появляться маркеры,​​ правого списка элементов​​Обратите внимание! В диалоговом​​ «Выполнить».​

Работа с макросами, записанными в Excel

​ в виде макроса.​​ каждом запуске Excel,​​ охватывать прочие приложения​​ использовать где-либо еще,​​при необходимости введите​ инструкциям ниже.​ в виде кода​ = True»​​ кнопке «Макросы», или​​ практике довольно ограничено.​ = f(0) +​​With ActiveWorkbook.Worksheets(«Лист1»).Sort​​ задачи. Чтобы запускать​

​ с помощью которых​​ можно использовать стрелки​ окне «Параметры макроса»​Программа макроса выполнить свои​ Узнайте, как создавать​ а макросы, сохраненные​ Office и другие​ этот модуль можно​ краткое описание действий​На вкладке​ Visual Basic для​Добавим также команду «Application.Calculation​

​ жмем сочетание клавиш​Ручная запись макросов, наоборот,​ 1 Case 1​

​.SetRange Range(«A2:D6»)​

​ его, нужно каждый​

​ можно изменять ее​ для настройки положения​	​ доступно поле для​ функции.​ и выполнять макросы.​
​ в таких книгах,​	​ программы, которые поддерживают​ скопировать в другую​ макроса.​Разработчик​ приложений (VBA). Такими​ = xlCalculationManual» вначале​ Alt+F8.​
​ требует знаний программирования,​	​ f(1) = f(1)​.Apply​ раз заходить в​ размеры. Наведите курсор​
​ и порядка расположения​ ввода его описания.​	​Теперь мы можем двигаться​Копирование модуля макроса в​ указываются в окне​ Visual Basic для​ книгу с помощью​Хотя поле «Описание» является​в группе​ действиями может быть​
​ кода, а в​После этого, открывается окно​	​ так как код​ + 1 Case​End With​ меню «Разработчик». Что​ мышки на любой​ кнопок инструментов на​ Данное описание будет​​ от простого к​​ другую книгу​ ​ «Макрос» (см. следующий​​ приложений (VBA). Например,​​ редактора Microsoft Visual​ необязательным, рекомендуется его​
​Код​	​ ввод текста или​ конце кода дописываем​ со списком записанных​ набирается вручную с​ 2 f(2) =​
​End Sub​ неудобно. Гораздо проще​	​ маркер на гранях​ панели быстрого доступа.​ доступно внизу при​
​ еще простейшему) Ведь​Если книга содержит макрос​	​ раздел).​ вы можете записать​ Basic.​
​ заполнить. Кроме того,​	​нажмите кнопку​​ чисел, выбор ячеек​​ «Application.Calculation = xlCalculationAutomatic».​
​ макросов. Ищем макрос,​ клавиатуры. Но, грамотно​	​ f(2) + 1​’————————————————​ создать «рабочую» кнопку.​

Работа с записанным кодом в редакторе Visual Basic (VBE)

​ или углах кнопки​ И нажмите ОК.​ выборе макроса из​ запускать макросы таким​ VBA, который нужно​Чтобы назначить сочетание клавиш​ макрос, который сначала​Назначение макроса объекту, фигуре​ желательно ввести понятное​Запись макроса​ или команд на​ Этим мы вначале​ который мы записали,​ написанный таким образом​ Case 3 f(3)​Sub Макрос2()​Если мы использовали элемент​ и удерживая левую​Теперь на панели быстрого​

​ списка. Рекомендуем всегда​ способом весьма неудобно.​ использовать где-либо еще,​ для запуска макроса,​ обновляет таблицу в​

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

​ или графическому элементу​ описание, которое будет​

• ​.​ ленте или в​ макроса отключаем автоматический​ выделяем его, и​ код, может значительно​ = f(3) +​ActiveWorkbook.Worksheets(«Лист1»).Sort.SortFields.Clear​ ActiveX, то:​ клавишу мышки перетягивайте,​

• ​ доступа появилась еще​ подписывать свои макросы.​ Далее рассмотрим более​ этот модуль можно​ в поле​

• ​ Excel, а затем​На листе щелкните правой​ полезно вам и​-ИЛИ-​ меню, форматирование ячеек,​ пересчет результата после​ жмем на кнопку​ ускорить выполнение процессов.​ 1 Case 4​ActiveWorkbook.Worksheets(«Лист1»).Sort.SortFields.Add Key:=Range(«B2:B6»), _​включаем режим конструктора (он​ изменяя таким образом​ одна кнопка для.​ Такой пользовательский тон​ простые варианты.​ скопировать в другую​

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

1. ​ каждого изменения ячеек,​​ «Выполнить».​​Прежде, чем начать автоматическую​​ f(4) = f(4)​​SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal​​ находится на вкладке​​ ее размеры. Теперь​

2. ​ Достаточно нажать на​​ этики работы с​​Полезный совет! Если вы​​ книгу с помощью​​введите любую строчную​​ ее отправки по​​ рисунка, фигуры или​ макрос. Если у​​ALT​​ и даже импорт​

​ а в конце​Можно поступить ещё проще,​

1. ​ запись макросов, нужно​​ + 1 Case​​With ActiveWorkbook.Worksheets(«Лист1»).Sort​​ «Разработчик»);​​ нажмите на кнопку​

2. ​ нее и сразу​​ Excel будет высоко​​ хотите отредактировать макрос​ редактора Microsoft Visual​ или прописную букву.​ электронной почте.​ элемент, к которому​

   ​ вас много макросов,​​+​ данных из внешнего​ макроса – включаем.​ и не вызывать​ включить макросы в​ 5 f(5) =​.SetRange Range(«A2:D6»)​щелкаем два раза кнопкой​ левой кнопкой мышки​ же запуститься макрос.​ оценен, когда список​ тогда выберите его​ Basic.​ Рекомендуется использовать сочетания​Макросы и средства VBA​ нужно назначить существующий​

3. ​ описания помогут быстро​​T​​ источника, такого как​ Таким образом, Excel​ даже окно выбора​

   ​ программе Microsoft Excel.​ f(5) + 1​​.Apply​​ мыши по созданной​ и удерживая ее​Полезный совет! Чтобы изменить​ пополниться десятками макросов.​ в списке выше​Назначение макроса объекту, фигуре​ клавиш, которые еще​ находятся на вкладке​ макрос и выберите​ определить, для чего​+​ Microsoft Access. Visual​ подсчитает результат только​ макросов. Мы же​Далее, переходим во вкладку​ Case 6 f(6)​End With​ кнопке – откроется​ перемещайте кнопку по​ внешний вид кнопки​Полезный совет! Старайтесь не​ описанного инструмента и​

4. ​ или графическому элементу​ не назначены другим​Разработчик​​ команду​​ они нужны.​M​ Basic для приложений​ один раз, а​ помним, что записали​ «Разработчик». Кликаем по​ = f(6) +​End Sub​ режим Visual Basic​ листу документа Excel​ для макроса в​ использовать популярные комбинации​

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

   ​Чтобы начать запись макроса,​+​ (VBA) является частью​ не будет его​ сочетание «горячих клавиш»​ кнопке «Запись макроса»,​ 1 Case 7​’————————————————​ с автоматически созданным​ в любое другое​ окне «Параметры Excel»-«Панель​ горячих клавиш для​ «Войти», а не​ кнопкой мыши объект,​ они будут переопределять​

6. ​ скрыта, поэтому сначала​.​​ нажмите кнопку​​R​

7. ​ языка программирования Visual​ постоянно пересчитывать, чем​

8. ​ для быстрого вызова​​ которая расположена на​​ f(7) = f(7)​​Sub Макрос3(​​ пустым каркасом;​

Работа с макросами, записанными в Excel

​ место. Чтобы затвердить​​ быстрого доступа», из​​ работы с Excel:​​ используйте кнопку «Изменить».​​ рисунка, фигуры или​ совпадающие с ними​ нужно включить ее.​В поле​​ОК​​.​

​ Basic. Он доступен​​ сэкономит время.​ макроса. В нашем​ ленте в блоке​ + 1 Case​) ActiveWorkbook.Worksheets(«Лист1»).Sort.SortFields.Clear​вписываем между двумя строками​ все изменения кнопки​ правого списка элементов​ CTRL+S; CTRL+A; CTRL+T;​ С помощью кнопки​ элемент, к которому​

​ стандартные сочетания клавиш​Выберите​Назначить макроса​

​.​

​В поле​

​ в большинстве приложений​	​Продвинутые пользователи могут выполнять​ случае, это Ctrl+М.​ инструментов «Код».​
​ 8 f(8) =​ActiveWorkbook.Worksheets(«Лист1»).Sort.SortFields.Add Key:=Range(«C2:C6»), _​	​ команду для вызова​ сделайте щелчок левой​ «Настройка панели быстрого​ CTRL+C; CTRL+V; CTRL+SHIFT+L​ войти вы всегда​ нужно назначить существующий​ в Excel, пока​
​Excel​выберите макрос, который​	​Выполните действия, которые нужно​Имя макроса​ Office. Хотя VBA​ не только редактирование​ Набираем данную комбинацию​Открывается окно настройки записи​ f(8) + 1​SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal​
​ макроса.​ кнопкой мышки в​	​ доступа» следует выделить​ и т.п. Ведь​ сможете перейти к​ макрос и выберите​ открыта книга, содержащая​>​ вы хотите назначить.​​ записать.​​введите название макроса.​ ​ позволяет автоматизировать процессы​​ и оптимизацию записанных​​ на клавиатуре, после​ макроса. Тут можно​
​ Case 9 f(9)​	​With ActiveWorkbook.Worksheets(«Лист1»).Sort​Для других графических объектов​ любую область листа​ макрос и нажать​ тогда их предназначение​
​ исходному коду выбранного​ команду​	​ макрос.​Параметры​Назначение макроса кнопке​
​На вкладке​	​ Сделайте имя понятным,​​ в приложениях Office​​ макросов, но и​​ чего макрос запускается.​​ указать любое имя​​ = f(9) +​​.SetRange Range(«A2:D6»)​​ макрос назначается так​​ (например, по любой​​ на кнопку «Изменить».​​ будет изменено. В​
​ макроса. Автоматически откроется​Назначить макрос​	​В поле​>​Вы можете назначить макрос​

support.office.com

Как запустить макрос в Excel разными способами

​Разработчик​ чтобы можно было​ и между ними,​ записывать код макросов​Как видим, макрос выполнил​ макроса, если установленное​ 1 End Select​.Apply​ же. Процедура еще​ ячейке) вне области​ Будет предложена небольшая​ окне «Параметры макроса»​ редактор Visual Basic​.​Описание​

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

Как выполнить макрос VBA в Excel

​ в точности все​ по умолчанию вас​ Next Cells(2, 1)​End With​

1. ​ проще. Нужно щелкнуть​
2. ​ кнопки.​ галерея иконок для​ так же присутствует​ именно в том​В поле​при необходимости введите​.​ его на панель​Код​

​ макрос.​ уметь программировать или​

​ того, чтобы приступить​ те действия, которые​ не устраивает. Главное,​ = «Сумма нечетных​End Sub​ правой кнопкой мыши​Теперь если мы нажмем​

​ нового оформления внешнего​ возможность использовать в​ месте где написан​Назначить макроса​ краткое описание действий​В категории​ быстрого доступа или​нажмите кнопку​Примечание:​ знать язык VBA,​ к этому, нужно​ были записаны ранее.​ чтобы имя это​ цифр = «​’————————————————​ по нарисованной кнопке​ на кнопку левой​ вида кнопки запуска​ комбинациях клавиш клавишу​ код данного макроса.​выберите макрос, который​

​ макроса.​Настроить ленту​ ленту.​Остановить запись​ Первым символом имени макроса​ так как все​ нажать на кнопку​Для того, чтобы отредактировать​ начиналось с буквы,​ & k For​Sub Макрос4()​ или картинке и​ кнопкой мышки сразу​ макроса с панели​ SHIFT. Как только​ Кнопка «Изменить» к​ вы хотите назначить.​Хотя это необязательная в​в списке​Назначение макроса для элемента​.​ должна быть буква.​ нужные действия выполнит​

​ «Visual Basic», которая​

Запуск макроса с помощью горячих клавиш

​ макрос, снова жмем​ а не с​ j = 0​ActiveWorkbook.Worksheets(«Лист1»).Sort.SortFields.Clear​ выбрать инструмент «Назначить​ же выполниться назначенный​ инструментов.​ вы придадите фокус​ сожалению, не для​Назначение макроса кнопке​

​ поле Описание, рекомендуется​Основные вкладки​ управления на листе​-ИЛИ-​

1. ​ Последующие символы могут​
2. ​ средство записи макросов.​ расположена в самом​ на кнопку «Макросы».​ цифры. Также, в​ To 9 If​
3. ​ActiveWorkbook.Worksheets(«Лист1»).Sort.SortFields.Add Key:=Range(«D2:D6»), _​ макрос».​ ей код VBA.​Главным недостатком размещения кнопки​ клавиатуры для поля​ всех макросов работает​Вы можете назначить макрос​ введите один. Полезно​

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

​ названии не должно​ f(j) >= 2​SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal​С помощью кнопок в​Кнопка в Excel как​ с макросом на​ ввода «Сочетание клавиш:​ одинаково.​ значку и добавить​ введите понятное описание​Разработчик​ формам и элементам​ALT​ или знаками подчеркивания.​

​ записи макроса регистрируются​После этого, открывается знакомое​ выбираем нужный макрос,​ быть пробелов. Мы​ Then Cells(n, 1)​With ActiveWorkbook.Worksheets(«Лист1»).Sort​ Excel можно не​ ссылка на ячейку,​ панели инструментов является​ CTRL+» и попытаетесь​Внимание! Макросы, созданные в​ его на панель​ сведениями, которые могут​, а затем нажмите​ ActiveX на листе.​+​ В имени макроса​ почти все ваши​ нам окно редактора​ и кликаем по​ оставили название по​ = «Цифра «​.SetRange Range(«A2:D6»)​ только выполнять созданные​ какой-либо инструмент, созданный​ то, что кнопка​

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

Как запустить макрос на панели быстрого доступа

​Включение и отключение макросов​T​ не должно содержаться​ действия. Поэтому если​ VBE.​ кнопке «Изменить».​ умолчанию – «Макрос1».​

​ & j &​.Apply​ макросы, но и​ макрос значительно упрощает​

1. ​ будет всегда доступна​ для комбинации, естественно​ быть по умолчанию​ ленту.​ вас или других​Сохранить​ в файлах Office​+​ пробелов; в качестве​ вы допустите ошибку,​Программист пишет там код​Открывается Microsoft Visual Basic​Тут же, при желании,​ » парная и​End With​ переходить в определенную​ работу в программе.​ для других файлов,​ с использованием клавиши​ не доступны в​Назначение макроса для элемента​
2. ​ пользователей, которые будут​.​Узнайте, как включать и​
3. ​M​ разделителей слов следует​ например нажмете не​ макроса вручную.​ (VBE) – среда,​ можно установить сочетание​ встречается » &​End Sub Примечание.​ ячейку, другой документ,​ Чаще всего это​ даже когда файл​ SHIFT на клавиатуре,​ списке диалогового окна​ управления на листе​ выполняться макрос. При​Чтобы записать макрос, следуйте​ отключать макросы в​

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

​ f(j) & «​ Красным текстом отмечены​ на другой лист.​ графический объект с​ с этим макросом​ сразу название поля​ «Макрос» в целях​Вы можете назначать макросы​ создании много макросы,​ инструкциям ниже.​ файлах Office.​R​ Если используется имя​ записи макросов зарегистрирует​ Microsoft Excel могут​ макросов.​

​ на которые макрос​ раз» n =​ отличающиеся параметры для​ Рассмотрим подробнее.​ назначенным макросом или​ будет закрыт. И​ ввода поменяется на​ политики безопасности. Ведь​ формам и элементам​ описание помогут вам​На вкладке​Открытие редактора Visual Basic​.​ макроса, являющееся ссылкой​ это действие. В​ значительно ускорить выполнение​

Запуск макроса с помощью кнопки на рабочем листе Excel

​Запись каждого макроса начинается​ будет запускаться. Первой​ n + 1​ каждого столбца.​Нарисуем графический объект и​ гиперссылкой. Рассмотрим, как​ если в такие​ «Сочетание клавиш: CTRL+​ имена макросов в​ ActiveX на листе.​ быстро определять, какие​Разработчик​

1. ​Нажмите клавиши​На вкладке​
2. ​ на ячейку, может​ таком случае можно​ рутинных и однообразных​ с команды Sub,​
3. ​ клавишей обязательно должна​ End If Next​Назначаем каждой автофигуре свой​ выделим его. На​ сделать такую кнопку.​ случаи нажать на​
4. ​ SHIFT+».​ надстройках Excel обычно​Открытие редактора Visual Basic​ макрос по исполнителям,​нажмите кнопку​ALT+F11​Разработчик​ появиться сообщение об​ снова записать всю​ процессов. Но, в​

​ а заканчивается командой​ быть клавиша Ctrl,​ End SubНо никак​ макрос: для «Наименование»​ вкладке «Вставка» найдем​Суть работы: создать графический​ кнопку запуска макроса,​В результате будет немного​ скрыты от сторонних​На вкладке​ в противном случае​Запись макроса​.​щелкните​ ошибке, указывающее на​ последовательность или изменить​ большинстве случаев, для​ End Sub. Сразу​ а вторую клавишу​ не получается вставить​ – Макрос1, а​ кнопку «Гиперссылка».​ объект и назначить​ тогда откроется файл​ длиннее комбинация, которая​ пользователей. Но если​Разработчик​ может потребоваться угадать.​.​Поиск справки по использованию​Макросы​ недопустимое имя макроса..​ код VBA. Поэтому​ этого больше подходят​ же после команды​ пользователь устанавливает самостоятельно.​

​ его в Excel,​ для «Май» –​После нажатия открывается окно​ для него макрос​ где он находиться​

exceltable.com

Как сделать кнопку в Excel с помощью макроса и гиперссылки

​ позволит расширить варианты,​ ввести правильно соответственное​щелкните​Чтобы начать запись макроса,​В поле​ редактора Visual Basic​, чтобы просмотреть макросы,​Чтобы назначить сочетание клавиш​ перед записью процесса​ макросы, код которых​

Как сделать кнопку на листе Excel

​ Sub указывается имя​ Например, мы, в​ чтобы он работал.​ Макрос2 и т.д.​ для создания связи​

​ или гиперссылку. Рассмотрим​

1. ​ и только потом​ чтобы обойти часто​ значение в поле​Visual Basic​ нажмите кнопку​Имя макроса​Узнайте, как найти справку​ связанные с книгой.​ для запуска макроса,​ следует хорошо проработать​ написан вручную, а​
2. ​ макроса. Оператор «Range(«…»).Select»​ качестве примера, установили​ Помогите пожалуйста! Кто​Все теперь достаточно только​ кнопки с файлом,​ подробнее.​ выполниться VBA код.​ используемые горячие клавиши.​ «Имя макроса:» то​или выберите​ОК​введите название макроса.​ по элементам Visual​
3. ​ Кроме того, можно​ в поле​ его. Чем точнее​ не автоматически записанные​ указывает выбор ячейки.​ клавишу М.​ знает, как вставить,​ кликнуть по заголовку​
4. ​ веб-страницей, электронной почтой,​Способы создания графического объекта:​Если вы хотите запускать​Excel позволяет пользователям запускать​ все кнопки в​Сервис​.​

​ Сделайте имя понятным,​ Basic.​ нажать клавиши​

​Сочетание клавиш​

Как в Excel сделать кнопку с макросом

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

​ макрос только из​ макросы с помощью​

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

Другие варианты использования кнопок

​ Basic (VBE) вы​. При этом откроется​ или прописную букву.​ будет работать макрос.​ оптимизировать через редактор​ C4. Оператор «ActiveCell.FormulaR1C1»​ По умолчанию, он​ Excel и скиньте​

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

​ к инструментам. Данная​ готовы к работе​>​На вкладке​ макрос.​ можете добавлять в​

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

​ столбец «Наименование» Макрос1​ и прописать к​ «Вставить». Открывается меню​ свой исходный код?​ панель по умолчанию​ с данным макросом​Редактор Visual Basic​

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

​Макрос​ клавиш с​ находятся на вкладке​

Как сделать кнопку сортировки в Excel для таблиц

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

1. ​dzug​ сортирует по возрастанию​ нему путь. Этот​ с набором элементов​ В такие случаи​
2. ​ находиться в самом​ из надстройки и​.​щелкните​ Первым символом имени макроса​ переменные, управляющие структуры​.​CTRL​
3. ​Разработчик​Автор: Максим Тютюшев​ и для других​ (файле), но при​
   ​: Пожалуста.. Кнопка на​
   ​ благодаря параметру Order:=xlAscending.​
   ​ способ не требует​
   ​ для вставки. Выбираем​
   ​ прекрасным решением будет​
   ​ верху окна программы.​
   ​ пользователь является автором​
   ​Поиск справки по использованию​
   ​Остановить запись​
   ​ должна быть буква.​
   ​ и другие элементы,​
   ​Внимание:​
   ​+​
   ​, которая по умолчанию​
   ​Примечание:​
   ​ расчетов.​
   ​ желании можно установить​
   ​ первом листе.. В​
   ​ Во всех остальных​
   ​ написания макросов и​
   ​ первый элемент ActiveX​
   ​ создание кнопки на​
   ​Чтобы запустить макрос с​
   ​ надстройки или доверительным​
   ​ редактора Visual Basic​
   ​.​
   ​ Последующие символы могут​
   ​ которые не поддерживает​
   ​ Макросы нельзя отменить. Прежде​
   ​SHIFT​
   ​ скрыта, поэтому сначала​
   ​ Мы стараемся как можно​
   ​Попытаемся немного изменить макрос.​
   ​ хранение в новой​
   ​ ячейку А1 введите​
   ​ столбцах присвоены макросы​
   ​ предоставляет пользователю широкие​
   ​ – «кнопку» (в​ листе Excel и​ помощью панели быстрого​ лицом.​
4. ​Узнайте, как найти справку​На вкладке​ быть буквами, цифрами​ средство записи макросов.​ чем впервые запускать​

​, так как они​ нужно включить ее.​ оперативнее обеспечивать вас​ Для этого, в​ книге, или в​ число и нажмите​ (2,3,4) с параметром​ возможности.​ виде серого кирпичика).​ назначить ей запуск​ доступа, требуется сделать​​ по элементам Visual​Разработчик​ или знаками подчеркивания.​ Так как средство​ записанный макрос, сохраните​

​ будут заменять собой​

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

exceltable.com

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

​ Теперь рисуем курсором​​ конкретного макроса. Для​ так:​
​Для каждого макроса в​ Basic.​щелкните​ В имени макроса​ записи макросов фиксирует​ книгу или создайте​ совпадающие с ними​ в статье Отображение​ на вашем языке.​Range(«C3»).Select​ Мы оставим значение​banny4​ тип сортировки по​ и с помощью​ кнопку необходимого размера.​ этого:​Щелкните на самую последнюю​ Excel можно присвоить​Если уже имеете код​Макросы​ не должно содержаться​ почти каждый шаг,​ ее копию, чтобы​ стандартные сочетания клавиш​ вкладки «Разработчик».​ Эта страница переведена​ActiveCell.FormulaR1C1 = «11»​ по умолчанию.​:​ убыванию. Чтобы видно​ макросов. Например, чтобы​Кнопка – элемент управления​Выберите инструмент: «РАЗРАБОТЧИК»-«Элементы управления»-«Вставить»-«Кнопка​ кнопку на панели​ свою комбинацию горячих​ макроса записанный в​, чтобы просмотреть макросы,​ пробелов; в качестве​ выполняемый во время​ предотвратить внесение нежелательных​ в Excel, пока​Перед записью макросов полезно​ автоматически, поэтому ее​Выражение «ActiveCell.FormulaR1C1 = «=R[-3]C+R[-2]C+R[-1]C»»​В самом нижнем поле​dzug​ было, в каком​ при нажатии, пользователь​ формы. Снова переходим​ (элемент управления формы».​ быстрого доступа (стрелка​ клавиш. Благодаря этому​ рабочей книге или​ связанные с книгой.​ разделителей слов следует​ записи, может также​ изменений. Если вас​ открыта книга, содержащая​ знать следующее:​ текст может содержать​ заменим на «ActiveCell.FormulaR1C1​ настройки макросов можно​, спасибо!!!!!!!!​ месяце было больше​ попадал в определенную​ на вкладку «Разработчик».​Выделите курсором мышки место​ вниз), чтобы получить​

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

​ макрос. Например, если​​Макрос, записанный для работы​​ неточности и грамматические​​ = «= R[-4]C+R[-3]C+R[-2]C+R[-1]C»».​

CyberForum.ru

​ оставить любое подходящее​

Is this article up to date?

Макрос – это специальная программа, написанная на встроенном в Excel языке программирования Visual Basic for Application (VBA). Если вам часто приходится выполнять одни и те же операции в Эксель, то гораздо проще записать макрос или найти готовый код макроса, для выполнения определенных действий в Интернете.

Во втором случае, Вы найдете макрос в виде VBA-кода. В этом обычно и состоит вопрос: как добавить макрос в рабочий лист Excel, и как им пользоваться.

Как включить макросы в Excel

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

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

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

Теперь разрешим использование всех макросов. Снова открываем «Файл» – «Параметры». Переходим на вкладку «Центр управления безопасностью», и в правой части окна кликаем по кнопочке «Параметры центра управления безопасностью».

Кликаем по вкладке «Параметры макросов», выделяем маркером пункт «Включить все макросы» и жмем «ОК». Теперь перезапустите Excel: закройте программу и запустите ее снова.

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

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

Вставим код макроса в модуль

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

Открываем редактор VBА: переходим на вкладку «Разработчик» и кликаем по кнопочке «Visual Basic»,   также можно воспользоваться комбинацией «Alt+F11».

С левой стороны редактора, в окне «Project», выделяем мышкой рабочую книгу. Рабочая книга – это Ваш открытый документ Excel, в который нужно вставить макрос. У меня он называется «Книга1».

Кликаем по выбранному пункту правой кнопкой мыши и выбираем из меню «Insert» – «Module».

В окне «Project» появилась новая папка «Modules», а в ней наш первый модуль с названием «Module1».

Справа появится поле для ввода VBA-кода. С помощью комбинации «Ctrl+V», вставляю в него код, который будет объединять несколько ячеек, без потери данных. Название макроса «MergeCell».

Следите за тем, куда Вы вставляете код, это будет написано или в заголовке редактора, или в заголовке окна для вставки кода. Мы вставляем код в модуль, соответственно надпись – «Modul1(Code)».

Сохраняем изменения, нажав комбинацию «Ctrl+S». Если Вы используете Excel 2007 и выше, появится окно сохранения документа. В нем, в поле «Тип файла», выберите из выпадающего списка «Книга Excel с поддержкой макросов» и нажмите «Сохранить».

Вставим код макроса в рабочий лист

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

Открываем редактор VBA и в окошке «Project» выделяем нужный лист, если их в рабочей книге несколько, на котором должен работать макрос: «Лист1 (Лист1)». Кликаем по нему два раза мышкой.

Справа появиться окошко для ввода кода. Обратите внимание, мы вставляем код в рабочий лист, соответственно в заголовке написано «Лист1(Code)». Сохраните изменения в документе, как было описано выше.

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

Создадим пользовательскую функцию

Например, создадим функцию, которая будет рассчитывать НДС. В окне «Project» кликаем по рабочему листу правой кнопкой мыши и выбираем «Insert» – «Module».

В папке «Modules», появляется второй модуль с названием «Module2». Прописываем VBA-код   в соответствующее окно, и сохраняем его, нажав «Ctrl+S». Называться функция будет «NDS».

Как запустить макросы в Excel

Теперь рассмотрим, как выполняются все созданные ранее макросы в документе Excel.

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

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

Откроется диалоговое окно «Макрос». В списке, выбираем нужное имя макроса: «MergeCell», и жмем «Выполнить».

Макрос выполнился: нужные ячейки объединены, и текст в них сохранен.

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

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

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

Если Вы создали пользовательскую функцию, то вставлять в документ ее также надо как функцию. У меня такая функция должна рассчитывать НДС.

Например, применим ее к ячейке А1, со значением «100». Выделяем ячейку, в которую будет вписан результат. Затем переходим на вкладку «Формулы» и нажимаем кнопочку «Вставить функцию».

Откроется окно «Мастер функций». В поле «Категория» выбираем из выпадающего списка «Определенные пользователем», в поле «Выберите функцию» выбираем название из списка: «NDS». Нажимаем «ОК».

Затем выделяю ячейку, для которой нужно посчитать НДС, и нажимаю «ОК».

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

---

Загрузка…