Офисное программирование

Константы Date необходимо помещать между знаками фунта (#). Независимо от того, в каком из форматов записывается литеральная константа Date, VBA переформатирует эту константу для соответствия одному из двух следующих форматов – в зависимости от того, содержит ли константа Date информацию о времени:

#2/5/02 9:17:00 PM#

#2/5/02#

Константы Boolean – существуют только две правильные константы типа Boolean: True и False.

Типизированные константы используются при явном задании типа константы. Объявление конкретного типа данных для константы может повысить точность вычислений. Для констант можно использовать типы данных Byte, Boolean, Integer, Long, Single, Double, Currency, Date, String.

Синтаксис:

Const имя_константы As type = value, name As type = value,…

где type – имя любого из типов данных VBA;

value – значение, присваиваемое константе.

Пример:

Const Pi As Double = 3.14

Внутренние константы называются также предопределенными константами. Внутренняя константа – это именованная константа, которая была определена разработчиками VBA. Внутренние константы все начинаются с букв vb для указания того, что они определяются языком VBA (табл. 2).

Таблица 2

Математические функции

1.2. Редактор VBA. Первое знакомство

Запуск редактора VBA

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

1) активизировать любое приложение пакета MS Office (Word, Excel);

2) выполнить команду меню: Сервис + Макрос + Редактор Visual Basic.

Или:

1) активизировать любое приложение пакета MS Office (Word, Excel);

2) нажать комбинацию клавиш Alt+F11.

И в том, и в другом случае откроется редактор VBA (рис. 1).

В левой части окна редактора появляется строение разрабатываемого проекта (аналог с Проводником). Необходимо обратить внимание на два главных объекта окна: Normal и Project (Операции).

Рис. 1. Стартовое окно редактора VBA

Примечание. Операции – это имя сохраненного документа в приложении Word, т. е. в скобках будет указано имя сохраненного документа.

Объект Normal глобальный, т. е. при работе в редакторе VBA в данном объекте будут создаваться модули, формы и т. д., которые будут доступны всему приложению Word. При каждом запуске Word содержимое объекта Normal становится доступным. Вывод: в данном объекте ничего не надо создавать!

Объект Project содержит рядом имя созданного документа, т. е. дается подсказка, в каком документе необходимо работать и где создаются модули, процедуры, приложения.

Создание простейших программ

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

Результат выдается в диалоговое окно Msgbox.

Технология выполнения

1. Активизируйте приложение Word, создайте (сохраните) новый документ под именем Операции.

2. Выйдите в редактор VBA (Alt+F11).

3. Правой кнопкой мыши выделите Project(Document), где Document – название созданного документа, например Операции, и выберите команду Insert + Module (рис. 2). Если же имеется папка Modules, то добавьте в нее (рис. 6).

Рис. 2. Добавление нового модуля в папку Project

4. Дважды щелкните по классу Module1 (рис. 3). В результате в правой части редактора VBA активизируется модуль (появится курсор), в котором можно прописывать все создаваемые программы, причем при вводе заготовки создаваемого модуля (слово Sub) и его имени (list1 – от листинг, можно вписать любое имя) появляется окончание данного модуля End Sub.

Рис. 3. Создание модуля List1

При объявлении глобальных переменных (согласно условию задачи) необходимо поставить курсор перед словом Sub, нажать Enter и вписать необходимые переменные, обращая внимание на раскрывающийся список (рис. 4).

Рис. 4. Создание переменных 4. Напишите следующую программу.

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

5. Запустите программу на выполнение, предварительно ее откомпилировав (проверив синтаксические ошибки). Для компиляции проекта выполните команду меню: Debug + Compile Project. Если ошибок нет, запустите приложение при помощи кнопки

Запуск панели инструментов или клавиши F5. Если все действия выполнены верно, то на экране появится диалоговое окно Msgbox с итоговым сообщением (рис. 5).

Рис. 5. Итоговый результат расчетов примера 1

Пример 2. Создать программу, которая производит сложение строковых переменных и результат выводит в диалоговое окно msgbox.