Добрый день!
Эту статью я хочу посвятить такому огромному разделу MS Excel как макросы, а точнее начнем сначала и рассмотрим как создать макрос в Excel, для чего он нужен и как его использовать в своей работе.
Как вы знаете из собственного опыта, при работе с макросом есть очень много «рутинны», то есть производятся одни и те же операции и действия которые нужны для получения результата, это могут быть заполнение однотипных таблиц ну или бланков, обработка данных, похожие как близнецы еженедельные, ежемесячные отчёты, и т.д. А вот использование макросов позволит вам производить эти действия в автоматическом режиме, используя возможности Excel на полную катушку, скидая эти рутинные и монотонные операции на мощные плечи Excel. Также причиной использования макросов может быть добавления нужных возможностей, которые еще не реализованы в стандартных функциях Excel (например, вывод , сбор данных на одном листе и прочее).
Если вы никогда не слышали о макросе, то самым точным его определением будет таким, это действия которые запрограммированы на определённую последовательность и записаны в среде программирования на языке Visual Basic for Applications (VBA) . Запуск макроса может производиться многократно и это заставит Excel выполнять любую последовательность необходимых нам действий, которые вручную выполнять нам просто не нравится или не хочется. Несмотря на великое множество языков программирования для всего комплекса Microsoft Office стандартом является именно VBA и он работает в любом приложении офисного пакета.
Итак, создать макрос в Excel возможно 2 способами:
Создать макрос в Excel
с помощью макрорекордера
Для начала проясним, что собой представляет макрорекордер и при чём тут макрос.
Макрорекордер – это вшитая в Excel небольшая программка, которая интерпретирует любое действие пользователя в кодах языка программирования VBA и записывает в программный модуль команды, которые получились в процессе работы. То есть, если мы при включенном макрорекордере, создадим нужный нам ежедневный отчёт, то макрорекордер всё запишет в своих командах пошагово и как итог создаст макрос, который будет создавать ежедневный отчёт автоматически.
Этот способ очень полезен тем, кто не владеет навыками и знаниями работы в языковой среде VBA. Но такая легкость в исполнении и записи макроса имеет свои минусы, как и плюсы:
- Записать макрорекордер может только то, что может пощупать, а значит записывать действия он может только в том случае, когда используются кнопки, иконки, команды меню и всё в этом духе, такие варианты как для него недоступна;
- В случае, когда в период записи была допущена ошибка, она также запишется. Но можно кнопкой отмены последнего действия, стереть последнюю команду которую вы неправильно записали на VBA;
- Запись в макрорекордере проводится только в границах окна MS Excel и в случае, когда вы закроете программу или включите другую, запись будет остановлена и перестанет выполняться.
Для включения макрорекордера на запись необходимо произвести следующие действия:
Следующим шагом в работе с макрорекордером станет настройка его параметров для дальнейшей записи макроса, это можно произвести в окне «Запись макроса»
, где: 
- поле «Имя макроса» — можете прописать понятное вам имя на любом языке, но должно начинаться с буквы и не содержать в себе знаком препинания и пробелы;
- поле «Сочетание клавиш» — будет вами использоваться, в дальнейшем, для быстрого старта вашего макроса. В случае, когда вам нужно будет прописать новое , то эта возможность будет доступна в меню «Сервис» — «Макрос» — «Макросы» — «Выполнить» или же на вкладке «Разработчик» нажав кнопочку «Макросы» ;
- поле «Сохранить в…»
— вы можете задать то место, куда будет сохранен (но не послан) текст макроса, а это 3 варианта:
- «Эта книга» — макрос будет записан в модуль текущей книги и сможет быть выполнен только в случае, когда данная книга Excel будет открыта;
- «Новая книга» — макрос будет сохранен в тот шаблон, на основе которого в Excel создается пустая новая книга, а это значит, что макрос станет доступен во всех книгах, которые будут создаваться на этом компьютере с этого момента;
- «Личная книга макросов» — является специальной книгой макросов Excel, которая называется «Personal.xls» и используется как специальное хранилище-библиотека макросов. При старте макросы из книги «Personal.xls» загружаются в память и могут быть запущены в любой книге в любой момент.
- поле «Описание» — здесь вы можете описать, что и как должен делать макрос, для чего он создавался и какие функции несет, это чисто информативное поле, что называется на память.
После того как вы запустили и записали свой макрос, выполнив все нужные действия, запись можно прекратить командой «Остановить запись» и ваш макрос с помощью макрорекордера будет создан.
Создать макрос в Excel
в редакторе Visual Basic.
В этом способе мы рассмотрим, как создать макрос в Excel через редактор программ на VBA который, как я говорил выше, встроен в любую версию Excel.
Запуск редактора программ на VBA происходит по-разному, в зависимости от версии вашей программы Excel:
- в версиях Excel 2003 и более старше , нам нужно в меню «Сервис» , выбрать пункт «Макрос» и нажать «Редактор Visual Basic» ;
- в версиях Excel 2007 и более новее , нам нужно на вкладке «Разработчик» нажать кнопку «Редактор Visual Basic» . В случае когда вы не находите эту вкладку вам нужно ее активировать выбрав пункт меню «Файл» — «Параметры» — «Настройка ленты» и в диалоговом окне флажком активируем вкладку «Разработчик» .
В открывшемся окне вы можете лицезреть интерфейс редактора VBA, здесь все написано по-английски и русификаторов не существует, можете не искать, а просто смиритесь и работайте, тем более что это только поначалу непонятно, а потом всё будет привычно.
Итак, как же, работать в редакторе VBA, где что хранится и как создать макрос в Excel. Вопросы такого характера возникают сразу же, как только вы увидите редактор и сейчас все их будем рассматривать.
Все наши макросы будут храниться в так называемых программных модулях . В любой из книг любой версии Excel нам доступно создание любых программных модулей в любом количестве и размещать в них все созданные нами макросы. Один модуль в состоянии содержать в себе любое количество нужных вам или созданных макросов. Модули доступны в окне «Project Explorer» и размещаются в верхнем левом углу редактора макросов (так же его можно вызвать комбинацией клавиш CTRL+R ).
Программные модули в редакторе VBA существуют в нескольких видах и используются для разных вариантов и ситуаций:
Собственно сам макрос при работе в стандартном модуле выглядит следующим образом: 
Рассмотрим на примере работающего макроса :
- Все макросы в обязательном порядке будут начинаться с оператора Sub , после которого следует имя вашего макроса и список аргументов в скобочках. В случаях, когда аргументы отсутствуют скобки нужно оставить пустыми;
- В обязательном порядке все макросы заканчиваются оператором End Sub ;
- Данные что находятся между операторами Sub и End Sub , является телом макроса, которое будет работать при запуске макроса. В примере, макрос проверяет и при вводе данных находит их в списке базы данных и , выводя указанное по критериям значение.
Как видите второй способ более труден в использовании и понимании, если у вас отсутствует опыт в программировании вообще или в частности в VBA. Очень сложно понять и разобраться какие команды и как вводятся, какие аргументы он использует для того чтобы макрос начал выполнять свою работу в автоматическом режиме. Но дорогу осилит идущий, как говорили древние мудрецы и поэтому и вам не стоит опускать руки, а следовать заповедям дедушки Ленина…
Создание кнопки для запуска макросов в панели инструментов
Как я говорил ранее вы можете вызывать процедуру макроса горячей комбинацией клавиш, но это очень утомительно помнить какую комбинацию кому назначена, поэтому лучше всего будет создание кнопки для запуска макроса. Кнопки создать, возможно, нескольких типов, а именно:
Данный способ доступен для любой из версий MS Excel и заключается он в том, что мы вынесем кнопку прямо на наш рабочий лист как графический объект. Для этого вам нужно:
- В MS Excel 2003 и более старше переходите в меню «Вид» , выбираете «Панель инструментов» и нажимаете кнопку «Формы» .
- В MS Excel 2007 и более новее вам нужно на вкладке «Разработчик» открыть выпадающее меню «Вставить» и выбрать объект «Кнопка» .
После всего этого вы должны нарисовать кнопку на вашем листе при зажатой левой кнопке мыши. После окончания процесса рисования включится автоматически окошко, где вам нужно будет выбрать тот макрос, который обязан, выполнятся при нажатии на вашей кнопке.
Как создать пользовательские функции на VBA
В принципе, создание, так называемых, пользовательских функций не особо отличаются от создания обычного макроса в стандартном программном модуле. Разница между этими понятиями заключается в том что макрос будет выполнять заложенные в нём действия с объектами книги или листа (это формулы, ячейки, и т.д), а вот пользовательская функция работает только со значениями которые она получает от нас и являются аргументами они же начальные данные для вычислений.
К примеру, для создания пользовательской функции налога на добавленную стоимость, он же НДС, нам нужно открыть наш редактор VBA и добавить новый модуль, выбрать в меню «Insert»
пункт «Module»
и ввести туда текст для нашей функции: 
Следует заметить, что главное отличие функции от макроса это заголовок Function
заменило Sub
и в наличии заполненный список аргументов, в нашем примере это Summa
. После того как наш код будет введен, он станет доступен в стандартном окне Мастера функций, который находится в меню «Формулы»
, пункт «Вставить функцию»
. 
И выбираем категорию «Определенные пользователем»
в которой и будет отображаться наша написанная функция «NDS»
. 
После выбора нашей функции можно установить курсор на ячейку с аргументом, в которой будет содержаться та сумма, для которой мы считаем НДС, всё происходит, как и с обычной функцией. 
А на этом у меня всё! Я очень надеюсь что
статья о том как создать макрос в Excel вам была понятной и полезной. Буду очень благодарен за оставленные комментарии, так как это показатель читаемости и вдохновляет на написание новых статей! Делитесь с друзьями прочитанным и ставьте лайк!
Многие люди думают, что макросы в Excel – это очень трудно, но это не так. В этой статье Вы найдёте несколько интересных и простых примеров, как можно автоматизировать Ваши повседневные задачи в Excel. Макрос – это программа на Visual Basic, созданная для того, чтобы автоматизировать задачи в Microsoft Office. В своих примерах я использую Excel 2010, но с таким же успехом Вы можете использовать Excel 2007.
Создаем макрос при помощи команды «Запись макроса»
Доступ к записанному макросу можно получить с помощью команды View Macros (Макросы), которая находится на вкладке View (Вид) в выпадающем меню Macros (Макросы). Откроется диалоговое окно Macro (Макрос), в котором Вы сможете выбрать нужный. Дважды кликните по имени макроса, чтобы выполнить программу.
Кроме этого, Вы можете связать макрос с кнопкой. Для этого:
- На вкладке File (Файл) нажмите Options (Параметры) > Quick Access Toolbar (Панель быстрого доступа).
- В поле Choose commands from (Выбрать команды из) выберите All Commands (Все команды).
- Найдите команду Option Button (Кнопка), нам нужна та, что относится к разделу Form Control (Элементы управления формы). Выделите ее и нажмите Add (Добавить). Затем нажмите ОК , чтобы закрыть параметры Excel.
- Выберите команду, только что добавленную на Панель быстрого доступа, и начертите контур кнопки на рабочем листе Excel.
- Назначьте макрос объекту.
Примечание: Если у вас включена вкладка Developer (Разработчик), то получить доступ к элементам управления формы можно с нее. Для этого перейдите на вкладку Developer (Разработчик), нажмите на иконку Insert (Вставить) и из раскрывающегося меню выберите нужный элемент.
Не знаете, как отобразить вкладку Developer (Разработчик)? Excel 2007: жмем на кнопку Office > Excel Options (Параметры Excel) > Popular (Основные) и ставим галочку напротив опции Show Developer tab in the Ribbon (Показывать вкладку “Разработчик” на ленте). Excel 2010: жмем по вкладке File (Файл) > Options (Параметры) > Customize Ribbon (Настройка ленты) и в правом списке включаем вкладку Developer (Разработчик).
Цикл FOR
В следующем примере Вы увидите, как использовать цикл FOR . Цикл FOR позволяет нам выполнить повторение цикла с разными значениями. Давайте посмотрим, как можно заполнить числами от 1 до 5 ячейки A1:A5 .
Для этого на вкладке Developer (Разработчик) нажмите Visual Basic . Дважды кликните по объекту из списка Microsoft Excel Objects , в котором должен быть сохранён макрос. Введите вот такой код:
Sub Macro1 () For n = 1 To 5 Cells(n, 1) = n Next n End Sub
Сохраните файл. Чтобы выполнить макрос, перейдите View > Macros > View Macros (Вид > Макросы > Макросы), выберите из списка название нужного макроса и нажмите Run (Выполнить).
Следующий код отображает фразу “Hello World ” в окне сообщений Windows.
Sub MacroName() MsgBox ("Hello World!") End Sub
В следующем примере мы создаём сообщение с выбором Yes (Да) или No (Нет). Если выбрать вариант Yes (Да), то значение ячейки будет удалено.
Sub MacroName() Dim Answer As String Answer = MsgBox("Are you sure you want to delete the cell values ?", vbQuestion + vbYesNo, "Delete cell") If Answer = vbYes Then ActiveCell.ClearContents End If End Sub
Давайте проверим этот код. Выделите ячейку и запустите макрос. Вам будет показано вот такое сообщение:
Если Вы нажмёте Yes (Да), значение в выделенной ячейке будет удалено. А если No (Нет) – значение сохранится.
Конструкция IF
В Microsoft Excel Вы также можете использовать конструкцию IF . В этом коде мы будем раскрашивать ячейки в зависимости от их значения. Если значение в ячейке больше 20 , то шрифт станет красным, иначе – синим.
Sub MacroName() Dim CellValue As Integer CellValue = ActiveCell.Value If CellValue > 20 Then With Selection.Font .Color = -16776961 End With Else With Selection.Font .ThemeColor = xlThemeColorLight2 .TintAndShade = 0 End With End If End Sub
Для проверки этого кода выберем ячейку со значением больше 20 :
Когда Вы запустите макрос, цвет шрифта изменится на красный:
При выполнении второго условия шрифт станет синим:
Конструкция CASE
Вы также можете использовать конструкцию Case , чтобы связать выполнение действия с появлением определённого значения в ячейке. В следующем примере отображается сообщение, содержание которого зависит от указанного возраста человека.
Sub MacroName() Dim CellValue As Integer CellValue = ActiveCell.Value Select Case CellValue Case 60 To 200 MsgBox "The person is old" Case 30 To 59 MsgBox "The person is adult" Case 18 To 29 MsgBox "The person is young" Case 0 To 17 MsgBox "The person is a child" Case Else MsgBox "Unknown age" End Select End Sub
Чтобы протестировать этот пример, Вы должны выбрать ячейку со значением и запустить макрос. Если значение выбранной ячейки, к примеру, равно 44 , то будет показано вот такое сообщение.
Если Вы не сильны в программировании, но, при этом, Вам необходимо реализовать какую-либо задачу, выходящую за рамки стандартных функций и команд 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)":
В пункте меню "Insert" выбираем "Module":
В левом окне "Project - VBA Project" у вас должна появиться новая папка "Modules" и в ней новый объект "Module1":
Переходим курсором в правое "Большое" поле для ввода и нажимаем Ctrl+V , скопированный макрос вставиться в модуль:
Макросы в 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 :
Всем доброго времени суток. На связи Алексей Гулынин. В данной статье я бы хотел рассказать о том, как записать макрос . В своих примерах я буду пользоваться Microsoft Excel 2007 , вы же можете пользоваться любой (желательно, что версия была не ниже моей). Зайдите в Excel, выберите Вид — Макросы — Запись макроса :
В версиях 2010 и 2013 панель может отличаться, но незначительно. Далее должно открыться вот такое диалоговое окно, которое называется "Запись макроса" :
Имя макроса задавайте в том случае, если это будет конечное решение, и вы в дальнейшем им собираетесь пользоваться. Если же вы собираетесь записать макрос для того, чтобы подсмотреть что-то (что вы забыли), тогда можно имя оставить как есть.
В имени макроса использовать запрещено: пробелы, знаки препинания, цифры в начале имени. Можно использовать: английские и русские буквы, цифры (не в начале), знак подчеркивания. Также запрещено называть макрос, имя которого будет совпадать с любым существующим объектом в Excel.
Для макроса можно задать сочетание клавиш, при нажатии на которую, он будет запускаться. На все макросы не нужно вешать горячие клавиши, нужно вешать только на те, которые мы часто будем использовать. Вообще способов запустить макрос много, как вариант, можно разместить на ленте (начиная с 2010 версии), в 2007 версии лента есть, но её нельзя редактировать, можно разместить на листе. Также макрос можно запускать по какому-нибудь событию. У горячих клавиш есть чувствительность, как к регистру, так и к раскладке
, поэтому внимательно относитесь к тому, какую горячую клавишу назначить макросу. Можете ставить большие буквы, для этого придётся нажимать Ctrl + Shift + Ваша буква
.
Если макрос сохранить в эту книгу, то он физически будет находиться в данном файле. Поэтому, когда файл закрыт, данный макрос будет недоступен. В каких случаях это оправдано делать: макрос требуется только для расчетов в этой книге и больше ни в каких других. Если данный макрос нужно будет использовать в других файлах (книгах) Excel, то данный файл придётся всегда держать открытым или постоянно открывать и закрывать, что совсем неудобно. Здесь нужно выбирать другой способ сохранения: личная книга макросов .
Это почти обычный файл, и называется он Personal.xlsb
. Этот файл находится в папке XLStart
, и открывается он в скрытом режиме. Пока мы в этот файл ничего не записали — его не существует. Как только что-то запишем — он появится. Всё что находится в папке XLStart
запускается автоматически. Плюс здесь в том, что макрос, который вы записали в личную книгу будет всегда доступен (его не нужно будет постоянно открывать — закрывать). Обращаю ваше внимание на то, что он будет доступен только на данном компьютере.
Также можно к макросу добавить описание.
Давайте запишем следующий макрос, который будет создавать новый лист и в ячейку C4
будет записывать фразу Привет VBA
. Причем надпись должна быть красным цветом и стиль оформления: полужирный. Нажимаем ОК
.
Вставляем лист таким образом:
Теперь в ячейку С4 записываем фразу Привет VBA . Затем нажимаем Ctrl + Enter , чтобы остаться в этой же ячейке и применить к ней форматирование. Если мы нажмём просто Enter , то фокус перейдёт на другую ячейку (нам этого не нужно). Затем правой кнопкой щелкаем по ячейке и выбираем Формат ячеек и переходим на вкладку Шрифт , выбираем красный и цвет и делаем шрифт жирным:
Нажимаем OK . Теперь можно наш макрос завершать. Сделать это можно несколькими способами: Вид — Макросы — Остановить запись , также можно отключить в левом нижнем углу (в 2007 версии) в панели состояния (на 3 картинке видно). Был создан "Лист4". Давайте удалим его и с помощью макроса создадим новый лист. Для этого воспользуемся горячей клавишей, которую мы задали для макроса Ctrl + Shift + Ц . Убедитесь, что вы находитесь на русской раскладке. Если вы сделали всё правильно, то у вас должен был создаться новый лист с нужной нам записью.
Создание макросов и их применение в Excel Разбираемые вопросы: Понятие макроса. Назначение макроса графическим изображениям. Понятие макроса Прежде чем приступить к написанию программ на VB воспользуемся простой возможностью создания программы макроса на языке VB с использованием McroRecorder. Кроме этого созданный код макроса может служить основой для дальнейших разработок.
Поделитесь работой в социальных сетях
Если эта работа Вам не подошла внизу страницы есть список похожих работ. Так же Вы можете воспользоваться кнопкой поиск
Лекция №2. Создание макросов и их применение в Excel
Разбираемые вопросы:
- Понятие макроса.
- Запись простых макросов.
- Выполнение макросов.
- Редактирование макросов.
- Назначение макроса графическим изображениям.
- Удаление макросов.
- Ограниченность макросов.
Понятие макроса
Прежде чем приступить к написанию программ на VBA , воспользуемся простой возможностью создания программы (макроса) на языке VBA с использованием MacroRecorder .
MacroRecorder это стандартное средство записи макросов в Excel , посредством которого можно записывать последовательность действий пользователя и получать соответствующий код (программу) на VBA . Программа, созданная с помощью MacroRecorder , называется макросом.
Основное назначение макросов автоматизация работы пользователя. Кроме этого, созданный код макроса может служить основой для дальнейших разработок.
При записи макроса запоминаются все действия пользователя, будь то нажатие клавиши или выбор определенной команды меню, которые автоматически преобразуются в программный код на языке VBA .
Каждому макросу дается имя, а для быстрого запуска макроса можно создать или присвоить ему «горячую» клавишу (клавишу, по нажатию на которую будет происходить запуск макроса). После запуска макрос будет автоматически выполнен тем приложением, в котором он создан и запущен. При выполнении макроса компьютер воспроизведет все действия пользователя.
Макрос это именованная последовательность заданных пользователем команд и действий, хранящаяся в форме программы на языке VBA .
Запись макросов в приложении Excel
Для работы с макросами в приложении Excel имеется специальная панель.
Для вызова этой панели необходимо выполнить последовательно команды меню: Вид → Панели инструментов → Visual Basic .
Для записи макроса необходимо:
- Нажать на кнопку «Запись макроса» на панели Visual Basic .
- В диалоговом окне «Запись макроса» присвоить имя макросу. (В имени макроса первым символом должна быть буква, не допускается использование пробелов).
- Выполнить действия, которые нужно записать.
- Нажать кнопку «Остановить запись».
Пример
Рассмотрим процедуру записи последовательности действий на следующем примере: определим максимальное значение в выделенном диапазоне ячеек.
Имеется таблица с информацией о самых ценных алмазах в мире.
Нам требуется создать макрос для нахождения алмаза с максимальной массой в граммах.
Это действие в Excel можно выполнить с помощью стандартной функции МАКС, но мы продемонстрируем на этом примере, как сохранить последовательность действий пользователя и на их основе создать макрос.
Выполним следующие действия:
- Откроем новую книгу.
- Создадим таблицу по приведенному образцу.
- В ячейке D 9 наберем «Максимальная масса в граммах».
- На панели Visual Basic нажмем кнопку «Запись макроса». Появится диалоговое окно «Запись макроса»:
- Введем вместо названия «Макрос1» название макроса «Алмаз» и нажмем «ОК». На экране появится панель инструментов « Остановить запись ».
Теперь все производимые нами действия будут записываться до тех пор, пока не будет нажата эта кнопка. Не выполняйте никаких лишних действий. Все наши действия фиксируются и записываются .
- Установим курсор в ячейку E 10. В этой ячейке должен появиться результат.
- Выполним команду Вставка → Функция . Появится диалоговое окно « Мастер функций ».
- Выберем в окне « Категории функций » « Статистические », где выберем функцию МАКС. Появится диалоговое окно, в первой строке которого необходимо указать диапазон, в котором мы будем искать максимальное значение, а E 2: E 9. нажмем «ОК».
Выполнение макросов
При выполнении макроса Excel повторяет те же действия, которые пользователь выполнял в процессе его создания. Продолжим работу с созданным макросом.
Чтобы проверить, как работает созданный нами макрос, прежде всего надо удалить из ячейки E 10 полученный результат. Затем:
- Установим курсор в любую ячейку листа.
- Выполним команду Сервис → Макрос → Макросы . Появится диалоговое окно « Макрос ».
- Выполнить ». В ячейке E 10 появится результат.
Редактирование макросов
Во время записи макроса Excel запоминает наши действия и преобразует их в код VBA . Можно просмотреть полученный код и отредактировать его, если в этом есть необходимость. Для просмотра созданного макроса выполните команду Сервис → Макрос → Макросы . Появится уже знакомое диалоговое окно « Макрос ».
Выделим макрос «Алмаз» и щелкнем по кнопке « Изменить ». Откроется окно редактора:
При записи макроса выполнялись всего два действия. Сначала мы установили курсор в ячейку E 10. на языке VBA этому действию соответствует строка:
Range (“ E 10”). Select
Затем мы вызвали функцию МАКС и в качестве аргумента указали диапазон ячеек E 2: E 9:
Полученный код можно редактировать непосредственно в редакторе Visual Basic . Изменим размер шрифта в ячейке E 10 на 16:
Range (“ E 10”). Font . Size = 16
Можно также изменить цвет шрифта. Например, изменим цвет текста в ячейке на красный:
Range (E 10”). Font . ColorIndex = 3
Значения, которые может принять свойство Font . ColorIndex , изменяется от 1 до 56.
После внесенных изменений текст макроса стал следующим:
Sub Алмаз ()
Алмаз Макрос
Range(“E10”).Select
ActiveCell.FormulaR1C1 = “=MAX(R[-8]C:R[-1]C)”
Range(“E10”).Font.Size = 16
Range(“E10”).Font.ColorIndex = 3
End Sub
Закройте окно редактора, вернитесь на лист Excel , удалите содержимое ячейки E 10 и запустите макрос на выполнение.
Назначение макроса графическим изображениям
Разрабатывая приложение, надо думать о том, чтобы создать легкий и удобный интерфейс для выполнения задач автоматизации. Запуск макросов на выполнение посредством команд меню или кнопок на панели Visual Basic не слишком удобный механизм для пользователей.
Для запуска макроса можно использовать любой элемент, находящийся на рабочем листе. Например, можно использовать для запуска любое графическое изображение. Рассмотрим соответствующий пример.
Используя панель « Рисование », нарисуем на листе любую автофигуру. Щелкнем правой кнопкой мыши на изображении и в открывшемся контекстном меню выберем команду « Назначить макрос ». Отобразится диалоговое окно « Назначить макрос объекту ». Затем необходимо выбрать макрос «Алмаз» и щелкнуть вне графического изображения, чтобы снять выделение с объекта.
Теперь макрос «Алмаз» можно запустить посредством щелчка на автофигуре.
Запустить макрос на выполнение можно и другим способом, используя командную кнопку. Вставить командную кнопку непосредственно на рабочий лист Excel можно с помощью панели инструментов « Формы » (Вид → Панели инструментов → Формы ). Затем необходимо назначить ей наш макрос.
Удаление макросов из списка макросов
Для того чтобы удалить макрос, надо:
- Выполнить команду Сервис → Макрос → Макросы . Появится уже знакомое диалоговое окно.
- Выделить макрос, подлежащий удалению, и щелкнуть по кнопке « Удалить ».
- Подтвердить выполнение операции в специальном окне, которое появится.
Ограниченность макросов
Множество операций Excel можно автоматизировать посредством макросов. Но макросы имеют и ограничения. С помощью макросов нельзя выполнить различные действия в зависимости от содержимого ячейки, нельзя вызвать некоторые диалоговые окна Excel , например, сохранить документ, нельзя отобразить и использовать пользовательские формы ввода данных.
Эти ограничения приводят к необходимости создания программ на VBA .
PAGE 4
Выполнение макроса
Запись
макроса
Вызов редактора VBA
Вызов панели элементов управления
Вызов конструктора форм
Вызов редактора сценариев
нопка
Панель «Формы»
Другие похожие работы, которые могут вас заинтересовать.вшм> |
|||
| 6386. | Практическое применение функций MS Excel | 219.04 KB | |
| Microsoft Excel программа предназначена для организации данных в таблице для документирования и графического представления информации. Рабочие книги MS Excel предоставляют возможность хранения и организации данных вычисления суммы значений в ячейках... | |||
| 12001. | Создание производства и применение новых кислотных комплексообразующих реагентов для увеличения нефтеотдачи карбонатных и глинистых нефтяных коллекторов | 18.13 KB | |
| При этом следует учитывать что 1 часть реагента АФК эквивалентна по эффективности 10 частям состава на основе соляной кислоты что резко снижает транспортные расходы на доставку продукции на нефтепромыслы. К настоящему моменту уже произведено более 40 тонн реагента. В 2012 году проводились испытания реагента при закачке в добывающие скважины ОАО Татнефть обработано 17 скважин. Также проводятся экспериментальные работы по закачке реагента по двум технологиям в нагнетательные скважины ЗАО Предприятие Кара Алтын 2 скважины. | |||
| 7988. | Создание аналитической геометрии Р.Декартом. Геометрии Лобачевского, Римана и их применение | 30.59 KB | |
| Тема: Создание аналитической геометрии Р. Геометрии Лобачевского Римана и их применение. Создание аналитической геометрии Рене Декартом. Геометрии Лобачевского Римана и их применение: а геометрия Лобачевского; б создание неевклидовой геометрии; в утверждение геометрии Лобачевского; г геометрия Римана. | |||
| 3861. | ПОДГОТОВКА ТЕСТА В MS EXCEL | 256.43 KB | |
| ПОДГОТОВКА ТЕСТА В MS EXCEL, На Листе1 наберем вопросы а на Листе2 разместим варианты ответов список ответов должен быть вертикальным первый ответ пустой для того чтобы после ответа первого учащегося тест можно было вернуть в первоначальное положение т. Заполним поля: Нажмем ОК и в ячейку D1 вставится следующая функция: Смысл функции в следующем: Если ответ в тестируемой ячейке C1 совпадает с верным то в ячейку D1 поместить 1 балл иначе 0 в данном случае верным будет ответ заметно ухудшилось он имеет порядковый номер 2 потому что ответ №1 пустой. 1... | |||
| 4776. | ЗВЕДЕНІ ТАБЛИЦІ В EXCEL | 39.01 KB | |
| Зведені таблиці є одним з найбільш могутніх засобів MS Excel з аналізубаз даних розміщених у таблицях чи списках. Зведені таблиці зручні при аналізі даних з кількохпричин: Дозволяють створювати узагальнюючі таблиці що надають можливість групування однотипних даних підведення підсумків підведення статистичних характеристик записів... | |||
| 4777. | ВІКНО ПРОГРАМИ EXCEL | 146.22 KB | |
| Операції з листами Основні операції що виконуються з робочими листами зібрані в контекстному меню яке відкривається після клацання правою кнопкою миші вкладки аркуша. Воно містить команди: Додати Insert Видалити Delete Перейменувати Renme Переместіть ськопіровать Move or Copy Виділити всі листи Select ll Sheets і так далі Наприклад аби задати типа аркуша що вставляється: Аркуш Worksheet Діаграма Chrt Макрос MS Excel. Вибір типа аркуша що вставляється. | |||
| 1577. | Використання списків у програмі EXCEL | 1.93 MB | |
| Визначивши діапазон як список можна керувати даними в цьому списку та аналізувати їх незалежно від інших даних поза межами списку. Наприклад використовуючи лише дані у списку можна фільтрувати стовпці додавати рядок підсумків і навіть створювати звіти зведених таблиць. Визначивши діапазон як список можна керувати даними в цьому списку та аналізувати їх незалежно від інших даних поза межами списку. | |||
| 7166. | Назначение электронных таблиц. Знакомство с MS Excel | 76.37 KB | |
| В нижней части окна книги размещаются ярлычки листов и кнопки их прокрутки а в верхней части строка заголовка. Кроме того окно содержит листы и полосы прокрутки. Две средние кнопки служат для прокрутки на один ярлычок влево или вправо. Перечисленные кнопки прокрутки и маркер разделения ярлычков не активизируют листы книги. | |||
| 7387. | Статистичний аналіз даних засобами програми Excel | 411.31 KB | |
| Статистичний аналіз даних засобами програми Excel Автор: к. Засоби статистичного аналізу даних у програмі Excel. Використання статистичних функцій для інтерполяції та екстраполяції даних та інше Засоби статистичного аналізу даних у програмі Excel До складу Microsoft Excel входить набір засобів аналізу даних так званий пакет аналізу призначений... | |||
| 20180. | Параметры и объекты диаграмм в Microsoft Office Excel | 1.01 MB | |
| Диаграммы позволяют: отобразить данные более наглядно облегчить их восприятие помочь при анализе и сравнении наблюдать за изменениями значений. А для анализа удобно использовать диаграммы с их специальными возможностями. Результатом работы табличного процессора является документ в виде таблицы или диаграммы. | |||