Следующая статья: Операторы и выражения VBA
Содержание
Запуск редактора VBA
Как и любые среды программирования, редактор VBA необходимо сначала запустить. Для запуска можно использовать два способа:
- активизировать любое приложение пакета MS Office (Word, Excel);
- выполнить команду меню: Сервис + Макрос + Редактор Visual Basic.
Или:
- активизировать любое приложение пакета MS Office (Word, Excel);
- нажать комбинацию клавиш Alt+F11.
И в том, и в другом случае откроется редактор VBA.
В левой части окна редактора появляется строение разрабатываемого проекта (аналог с Проводником). Необходимо обратить внимание на два главных объекта окна: Normal и Project (Операции).
Стартовое окно редактора VBA
Примечание. Операции – это имя сохраненного документа в приложении Word, то есть в скобках будет указано имя сохраненного документа.
Объект Normal глобальный, то есть при работе в редакторе VBA в данном объекте будут создаваться модули, формы и так далее, которые будут доступны всему приложению Word. При каждом запуске Word содержимое объекта Normal становится доступным. Вывод: в данном объекте ничего не надо создавать!
Объект Project содержит рядом имя созданного документа, то есть дается подсказка, в каком документе необходимо работать и где создаются модули, процедуры, приложения.
Создание простейших программ
Пример
Создать программу, которая работает с глобальными переменными, рассчитывая выражение:
Результат выдается в диалоговое окно Msgbox.
Технология выполнения
- Активизируйте приложение Word, создайте (сохраните) новый документ под именем Операции.
- Выйдите в редактор VBA (Alt+F11).
- Правой кнопкой мыши выделите Project ( Document ), где Document – название созданного документа, например Операции, и выберите команду Insert + Module. Если же имеется папка Modules, то добавьте в нее.
Добавление нового модуля в папку Project
- Дважды щелкните по классу Module 1. В результате в правой части редактора VBA активизируется модуль (появится курсор), в котором можно прописывать все создаваемые программы, причем при вводе заготовки создаваемого модуля (слово Sub) и его имени (list 1 – от листинг, можно вписать любое имя) появляется окончание данного модуля End Sub.
Создание модуля List 1
При объявлении глобальных переменных (согласно условию задачи) необходимо поставить курсор перед словом Sub, нажать Enter и вписать необходимые переменные, обращая внимание на раскрывающийся список.
Создание переменных
Напишите следующую программу.
Dim a As Double
Dim b, c, d As Double
Dim k As String
Const Pi As Double=3.14
Sub list1()
a=5
b=25.6
c=Sin(a ^ 2) + Cos(b) + Pi
d=Sqr(c)
MsgBox (d)
End Sub
- Запустите программу на выполнение, предварительно ее откомпилировав (проверив синтаксические ошибки). Для компиляции проекта выполните команду меню: Debug + Compile Project. Если ошибок нет, запустите приложение при помощи кнопки Запуск панели инструментов или клавиши F5. Если все действия выполнены верно, то на экране появится диалоговое окно Msgbox с итоговым сообщением.
Итоговый результат расчетов примера
Пример
Создать программу, которая производит сложение строковых переменных и результат выводит в диалоговое окно msgbox.
Технология выполнения
- В том же документе Операции выделите правой кнопкой мыши папку Modules и выполните команду: Insert + Module.
Добавление нового модуля
- В результате появится новый модуль, где можно создать новую программу (модуль). Пропишите следующий код.
Dim a, b, c As String
Sub list2()
a=«Привет!»
b=«Пока не сложно?»
c=a + b
MsgBox (c)
End Sub
В данном примере переменным a и b присваиваются строковые значения (в кавычках!), после чего происходит сложение строк. Результат показан на рисунке.
Результат примера
- Прокомпилируйте программу и запустите ее на выполнение.
Примечание. Если в одном документе находятся несколько модулей, то при запуске программ может появляться диалоговое окно выбора макроса (модуля), в котором необходимо выбрать макрос, выделить его и нажать кнопку «Run».
Выбор макроса на выполнение
Видео: «Украсть за 60 секунд»
Видео о краже банкомата всего за 60 секунд, грабители основательно подготовились к работе
