Создание приложений MS Word

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

Применение VBA в прикладных пакетах программ Word и Excel

В прикладных программах в среде VBA можно создать три вида процедур общего назначения:

§ Процедуры типа Function (Функция). Эти процедуры создаются для вычислений. Могут вызываться из любой процедуры обработки события.

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

§ Процедуры типа Property (Свойства). Используются для создания определяемых пользователем свойств в программе и их изменения.

Процедура – функция представляет собой логически завершенный фрагмент программы, который после завершения выполнения возвращает некоторое значение.

Функция имеет следующий синтаксис:

Function <Имя> (Параметры) As Type

<Операторы>

End Function

Обращение к функции производится с использованием следующего выражения:

Function <Имя> (Параметры)

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

Sub <Имя> (Параметры)

<Операторы>

End Sub

Чтобы вызвать процедуру типа Sub, нужно указать ее имя и список требуемых аргументов.

Процедура – свойство представляет собой последовательность инструкций языка VBA, которые определяют созданные свойства и позволяют их изменять.

В языке VBA есть три основных типа процедур Property:

o Property Let;

o Property Get;

o Property Set.

Процедура Property Let присваивает значение свойству, процедура Property Get возвращает значение свойства и процедура Property Set задает ссылку на объект.

Синтаксис процедуры- свойство имеет вид:

Property <Имя> (Параметры) As Type

<Операторы>

End Property

Процедуры Property в программах используются попарно:

§ Property Let с Property Get

§ Property Set с Property Get

Это означает, что в описании процедуры Property Get должны использоваться аргументы с тем же самым именем и типом данных, как и аргументы вязанной с ней процедурой Property Let:

Property Let Имя(X As Integer, Y As Integer, Z As Variant)

<Операторы>

End Property

Property Get Имя(X As Integer, Y As Integer) As Variant

<Операторы>

End Property

VBA имеет набор встроенных функций. По назначению эти функции подразделяются на:

o Финансово-математические.

o Математические.

o Преобразования типа.

o Обработки строк.

o Статуса.

o Даты и времени.

o Прочие.

Финансово-математические функции предназначены для выполнения типовых финансовых расчетов.

В таблице 4.5.1 приведены некоторые из наиболее часто используемых функций.

Таблица 4.5.1

Имя функции	Возвращаемое значение
DDB(Стоимость, Остаточная_стоимость. Время_эксплуатации, Период, Кратность)	Вычисляет амортизацию фондов в течение заданного интервала времени
FV(Ставка, Кпер, Плата, [,Нз][,Тип])	Вычисляет накопленную стоимость при известном размере регулярного взноса и постоянной процентной ставке
NPV(Ставка, Величина())	Вычисляет чистую приведенную стоимость инвестиционного проекта при известном размере выплат и поступлений и при постоянной дисконтной ставке

Математические функции предназначены для типовых математических расчетов. Некоторые из них приведены в таблице 4.5.2.

Таблица 4.5.2.

Имя функции	Возвращаемое значение
Abs(Числовое выражение)	Абсолютное значение числа
Fix(Числовое выражение)	Возвращает результат округления выражения с плавающей точкой до целой части. Для положительных значений аргумента возвращает ближайшее меньшее число, а для отрицательных – ближайшее большее.
Int(Числовое выражение)	Возвращает результат округления выражения с плавающей точкой до целой части. Для отрицательных значений аргумента возвращает ближайшее меньшее отрицательное число.
Rnd(Число)	Возвращает псевдослучайное число одинарной точности в интервале от 0 до 1.
Sqr(Числовое выражение)	Возвращает квадратный корень числового выражения.
Log(Числовое выражение)	Возвращает натуральный логарифм от значения числового выражения.
Sgn(Числовое выражение)	Возвращает +1, значение числового выражения положительное, -1, если отрицательное и 0, если 0.

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

Таблица 4.5.3.

Имя функции	Возвращаемое значение
ASC(Строка)	Возвращает ASCII код первого символа строки
Chr(Кодсимвола)	Возвращает символ, соответствующий указанному коду.
Instr(Начальная Позиция, Строка 1,Строка 2)	Возвращает номер позиции первого обнаружения Строки 2 в Строке 1. Начальная позиция – указывает начало поиска.
Lcase(Строка)	Возвращает Строку из строчных букв
Left(Строка, Количество Символов)	Возвращает указанное Количество символов Строки слева
LEN(Строка)	Возвращает количество символов в строке
MID(Строка, Начальное значение, Длина)	Возвращает часть строки заданной длины, начиная с указанного символа
RIGHT(Строка, Количество Символов)	Возвращает указанное Количество символов Строки справа
SPASE(Длина)	Возвращает строку пробелов указанной длины
STR(Число)	Возвращает строковое представление числа
StrComp(Строка 1, Строка 2, Режим Сравнения)	Возвращает результат сравнения строк в виде числа.
String(Длина, ASCII код/ Строка)	Возвращает строку символов указанной длины, соответствующих ASCII коду или первому символу строки.
VAL(Строка)	Переводит строку в число.

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

Таблица 4.5.4

Имя функции	Возвращаемое значение
Date	Возвращает или устанавливает текущую системную дату в формате ДД-ММ-ГГ
DateAdd(Интервал,Количество, Дата)	Возвращает дату, полученную увеличением заданной на количество интервалов
DateDiff(Интервал, Начальная дата, Конечная дата)	Возвращает количество интервалов между двумя датами
Now	Возвращает системную дату и время в формате ДД-ММ-ГГ ЧЧ:ММ:СС
Time	Возвращает текущее системное время в формате ЧЧ:ММ:СС
Timer	Возвращает количество секунд, прошедших от полуночи до текущего момента
Weekday(Дата)	Возвращает номер дня недели, соответствующий Дате
Year(Дата)	Возвращает число, соответствующее году Даты

После создания нового пустого документа проект MS Word содержит два объекта:

· объект Document, собственно создаваемый документ;

· ссылка на шаблон, на основе которого создается документ.

В последующем проект может содержать формы, стандартные модули и модули классов.

MS Word имеет сложную структуру объектов, среди которых есть некоторое количество общих с другими приложениями объектов.

Само приложение MS Word представляет собой объект Application.

Основные объекты приложения и их свойства:

Options – обеспечивает доступ к параметрам MS Word;

Browser -обеспечивает программное управление перемещением по документу. Свойство Target определяет элемент перехода. Методы Next и Previous устанавливают направление перехода.

CommandBars – содержит все панели инструментов.

FileConverters - содержит все объекты, обеспечивающие открытие и сохранение файлов.

FontNames - представляет список всех доступных шрифтов.

Открывается документ с использованием метода Open. Синтаксис метода:

Document.Open FileName:-“c:\Информатика.doc”,_

Revert:=True, AddToRecentFiles:=True

В данном примере открывается файл Информатика.doc. Параметр AddToRecentFiles имеет значение True, поэтому открываемый файл добавляется в список файлов меню Файл.

Параметр Revert установлен в True, поэтому при повторном открытии данного файла он открывается заново и все изменения игнорируются.

Активизировать открытый документ с именем Пример_1 можно с помощью инструкции:

Document(Пример_1).Activate

Новый документ добавляется к открытым документам с помощью метода Add:

Document.Add Template,

где

Template – элемент, определяющий имя шаблона, на основании которого создается документ.

Например, создание документа на основании шаблона Elegant resume описывается следующим образом:

Document.Add Template:-“c:\program files\microsoft office\”_

&”template\1049\elegant resume.dot”

Сохранение документа осуществляется посредством метода Save. Синтаксис метода:

Document.Save(True)

Параметр True указывает, будет выводиться запрос на сохранение.

Закрывается документ с помощью метода Close. Синтаксис метода:

ActiveDocument.Close(SaveChange:=wdSaveChange,_ OriginalFormat:-wdWordDocument)

Здесь параметр SaveChange определяет сохранение изменение, а параметр OriginalFormat определяет, что документ сохраняется в формате MS Word.

Объект Document управляется следующими событиями:

· Событие New – происходит при создании нового документа.

· Событие Open – происходит при открытии документа.

· Событие Close – происходит при закрытии документа.

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

· В окне проекта кликнуть на элементе ThisDocument.

· В окне кода раскрыть ниспадающий список и выбрать пункт Document (рис. 4.5.3.).

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

Рис.4.5.3. Окно обработки событий Document.

Для выполнения операций с текстом используются объекты MS Word Range и Selection.

Объект Selection обеспечивает выполнение операций над выделенным текстом.

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

Set RangeK=ActiveDocument.Range(0,20)

RangeK.Select

В приведенном фрагменте выделяется двадцать один символ активного документа.

Для установки параметров шрифта объект Range содержит набор свойств:

· Bold - устанавливает полужирное написание шрифта.

· Font - устанавливает тип шрифта.

· Italic - устанавливает начертание символов текста курсивом.

Выполнение операций с текстом поддерживается с помощью методов Range и Selection объекта Document. Перечень этих методов и соответствующие им операции с текстом приведены в таблице 4.5.5.

Таблица 4.5.5

Метод	Выполняемое действие
Select	Выделение текста
Copy	Копирование текста в буфер обмена
Paste	Вставка текста из буфера обмена
Delete	Удаление текста
InsertSymbol	Вставка символа

Методы объекта Range служат для управления атрибутами текста в выбранной части документа. Кроме методов, приведенных в таблице 4.5.5 объект Range имеет еще несколько специфических методов:

§ Метод InsertAfter - выполняет вставку текста в конец выделенной области или диапазона.

§ Метод InsertParagraf - служит для замены выделенного диапазона на новый абзац.

§ Метод InsertSymbol - вставляет символ в заданное место.

Объект Selection имеет те же методы, что и объект Range. Исключение составляет метод TypeText, который обеспечивает вставку текста в выделение. Следующий фрагмент программы выполняет вставку текста t в выделенный диапазон:

Range(1,5).Select

Selection.TypeText(«Вставляемый текст»)

Дата добавления: 2014-12-10