170 Часть III. Visual Basic for Applications
Добавление нового модуля VBA
Чтобы добавить в проект новый модуль VBA, выделите название проекта в окне Project Explorer и выберите команду Inserts Module (Вставка1^ Модуль). Также можете щелкнуть правой кнопкой мыши на названии проекта и выбрать команду Inserts Module в контекстном меню.
При создании макроса Excel автоматически включает модуль VBA, в котором будет храниться создаваемый вами код.
Удаление модуля VBA
Чтобы удалить из проекта модуль VBA или модуль класса, выделите название мо дуля в окне Project Explorer и используйте команду File1^Remove ххх (где ххх— на звание модуля). Кроме того, вы можете щелкнуть правой кнопкой мыши на названии модуля и выбрать команду Remove ххх из контекстного меню. Перед удалением мо дуля отображается запрос на его экспорт (детально об этом рассказано в следующем разделе). Вы не сможете удалить программные модули, соответствующие рабочей книге (программный модуль ЭтаКнига), а также рабочему листу (например, про граммный модуль Лист1).
Экспорт и импорт объектов
За исключением объектов, перечисленных в узле R e f e r e n c e s , каждый объект в проекте можно сохранить в отдельном файле. Сохранение отдельного объекта в проек те называется экспортом. Соответственно, вы можете также импортировать объекты в про ект. Экспорт и импорт объектов востребован, если созданный ранее объект (например, мо дуль VBA или форму U serF orm ) нужно использовать в другом проекте.
Чтобы экспортировать объект, выберите его в окне Project Explorer и выполните ко манду File^Export File (Файл^Экспорт файла) (или нажмите <Ctrl+E>). При этом ото бражается диалоговое окно, запрашивающее имя файла. Обратите внимание, что сам объект остается в проекте (экспортируется только его копия). Если вы экспортируете объект U serF orm , экспортируется также весь код, связанный с формой U serF orm .
Чтобы импортировать файл в проект, выберите имя проекта в окне Project Explorer и выполните команду File*=>Import File (Файл^Импорт файла). Появится диалоговое ок но, в котором необходимо указать имя файла. Можно импортировать только те файлы, которые экспортированы с помощью команды File1^Export File.
Совет
Если нужно скопировать модуль или объект UserForm в другой объект, во все не обязательно сначала экспортировать, а затем импортировать объект. Убедитесь в том, что оба проекта открыты; просто откройте Project Explorer и перетащите объект из одного проекта в другой.
Работа с окнами кода
В совершенстве овладев VBA, вы будете много времени работать в окнах кода. Каж дому объекту в проекте соответствует свое окно кода. Такими объектами могут быть следующие:
Глава 7. Введение в VBA |
171 |
|
• |
сама рабочая книга ( Э т а К н и г а в окне Project Explorer); |
|
• |
рабочий лист или лист диаграммы рабочей книги (например, Л и с т 1 |
или Д и а |
гр а м м а ! в окне Project Explorer);
•модуль VBA;
•модуль класса (специальный тип модуля, позволяющий создавать новые классы объектов);
•форма U serF orm .
Сворачивание и восстановление окон
В любой момент в редакторе VBE можно открыть несколько окон кода, и это суще ственно усложняет работу. Окна кода во многом напоминают окна рабочих листов Excel. Их можно свернуть, развернуть, скрыть, изменить порядок отображения на экране и т.д. Многие пользователи предпочитают разворачивать окно кода, над которым они работа ют в данный момент, что позволяет видеть большую часть программы, не отвлекаясь на другие модули. Чтобы максимизировать окно кода, щелкните на кнопке Развернуть в строке заголовка или дважды щелкните на самой строке заголовка. Чтобы вернуть окну кода прежний размер, щелкните на кнопке Восстановить в строке заголовка.
Иногда необходимо, чтобы на экране отображалось сразу несколько окон кода. Например, требуется сравнить код в двух модулях или скопировать код из одного модуля в другой.
Сворачивая окно кода, вы скрываете его в окне редактора. Кроме того, можно щелк нуть на кнопке Свернуть (Close) в строке заголовка окна кода, чтобы полностью его за крыть. Открыть окно кода заново можно, дважды щелкнув на соответствующем объекте в окне Project Explorer.
VBE не позволяет закрывать рабочую книгу. Для этого вы должны вернуться в окно Excel и там закрыть книгу. Однако можно использовать окно отладки (Immediate), чтобы закрыть рабочую книгу или отключить надстройку. Активизируйте это окно, введите оператор VBA (пример показан ниже) и нажмите <Enter>.
Workbooks ( "m ya dd in . xlam " ) . Close
Этот оператор выполняет метод C lo s e объекта W orkbook, закрывающий рабочую книгу. В данном примере рабочая книга является надстройкой.
Сохранение кода VBA
Как правило, окно кода содержит четыре типа кода.
•Sub (Процедура). Это набор инструкций, выполняющих определенное действие.
•Function (Функция). Это набор инструкций, возвращающий значение или мас сив значений (функции VBA напоминают функции рабочего листа Excel, напри мер СУММ).
•Property (Процедуры свойств). Специальные процедуры, используемые в мо дулях классов.
•Объявление. Объявления включают информацию о переменной, которая предо ставляется VBA. Например, можно объявить тип данных для переменных, кото рые вы планируете использовать в коде.
172 |
Часть III. Visual Basic for Applications |
Вотдельном модуле VBA может храниться любое количество процедур, функций
иобъявлений. Способ организации модуля VBA зависит только от вашего желания. Можно записывать весь код VBA приложения в одном модуле VBA или разделять код на несколько модулей.
Примечание
Несмотря на то что пользователям предоставляются широкие возможности по выбору места хранения кода VBA, существует ряд ограничений. Процеду ры обработки событий должны содержаться в окне кода объекта, которому соответствует это событие. Например, если создана процедура, которая вызывается при открытии рабочей книги, то эта процедура должна распола гаться в окне кода для объекта Э т а К н и г а и иметь специальное название. Подобный вопрос станет более понятным после того, как вы изучите собы тия (глава 19) и пользовательские формы (часть IV).
Ввод кода VBA
Для того чтобы выполнить одно из действий программным образом, необходимо на писать программу VBA в окне кода. Код VBA располагается в процедуре. Процедура со стоит из операторов VBA. На данном этапе (для примера) остановимся только на одном типе окна кода — модуле VBА.
Вы можете добавить код в модуль VBA тремя способами.
•Ввести код вручную. Для этого используйте клавиатуру.
•Использовать функцию создания макросов. Используйте функцию записи мак росов в Excel, чтобы записать действия и преобразовать их в код VBA.
•Использовать операцию копирования и вставки. Скопируйте текст программы из другого модуля и вставьте его в модуль, над которым работаете.
Ввод кода вручную
Иногда самый простой путь является наилучшим. Непосредственное введение кода связано с использованием клавиатуры, т.е. вы вводите код программы с помощью кла виатуры. Клавиша <ТаЬ> при этом поможет задать отступ в строках, которые логически принадлежат одной группе (например, условные операторы I f и End I f ) . Это совер шенно не обязательно, но помогает быстрее освоить программу, анализируя ее блочную структуру. Именно поэтому подобный подход в программировании называется “хорошим стилем”.
Ввод и редактирование кода в модуле VBA выполняются обычным образом. Вы можете выделять текст, копировать и вырезать, а затем вставлять в другое место программы.
Терминология
В книге применяются термины подпрограмма, процедура и макрос. Программисты для описания автоматизированной задачи обычно используют слово процедура. В Excel процедуру также называют макросом. Технически процедура может быть двух видов: Sub (Подпрограмма) либо F u n c tio n (Функция); оба вида иногда называют подпро граммами. В книге эти термины используются как синонимы. Тем не менее между про цедурами типа Sub и F u n c tio n существует большая разница, о чем будет рассказано в главах 9 и 10.
Глава 7. Введение в VBA |
173 |
Отдельная инструкция в VBA может иметь произвольную длину. Однако для обеспе чения удобочитаемости кода длинные инструкции лучше разбить на две или более строк. Для этого следует в конце строки ввести пробел и символ подчеркивания, а затем нажать <Enter> и продолжить инструкцию в следующей строке. Например, ниже приведен один оператор VBA, разбитый на четыре строки.
MsgBox "Н ев о зм ож н о н а й т и " & |
U Case(SH O R TCU TM EN U FILE) _ |
|||
& v b C r L f Sc |
v b C r L f & "Файл |
долж ен н а х о д и т ь с я в " _ |
||
& |
T h i s W o r k b o o k . P a t h & v b C r L f & v b C r L f |
_ |
||
& |
"В о зм о ж н о , т р е б у е т с я п е р е у с т а н о в и т ь |
B u d g e t M a n " , _ |
||
v b C r i t i c a l , |
APPNAME |
|
|
|
Обратите внимание, что четыре последние строки этого оператора введены с отсту пом. Это необязательное условие, однако таким образом вы указываете, что на самом деле эти четыре строки являются одним оператором.
Совет
Как и в Excel, в VBE существует несколько уровней отмены операций. По этому, если вы по ошибке удалили инструкцию, можете несколько раз щелк нуть на кнопке Undo (Отменить) (либо нажать клавиши <Ctrl+Z>), после чего инструкция вновь появится в коде. После отмены операции можно щелкнуть на кнопке Redo (Вернуть) (либо нажать клавиши <Ctrl+Y>), чтобы вернуть из менения, которые ранее были отменены. Эта функция поможет исправить критически важные ошибки, поэтому не пренебрегайте ею.
Выполните такие действия: добавьте в проект модуль VBA и введите следующую процедуру в окне кода данного модуля.
Sub S a y H e l l o O |
|
|
|
Msg |
= "Ваше имя " |
& |
A p p l i c a t i o n . U serN a m e & " ? " |
Ans |
= M s g B o x (M s g , |
v b Y e s N o ) |
|
I f A n s = v b N o T h e n |
|
|
|
M sgB ox " Н и ч е г о |
с т р а ш н о г о . " |
||
Else |
|
|
|
M sgB o x "Н а в е р н о е , |
я я с н о в и д я щ и й !" |
||
End |
I f |
|
|
End Sub |
|
|
|
На рис. 7.4 показано, как это выглядит в модуле VBA.
Примечание
При вводе кода вы могли заметить, что VBE вносит некоторые изменения во введенный текст. Например, если пропустить пробел перед или после знака равенства (=), VBE автоматически вставит его. Кроме того, изменяется цвет некоторых слов кода. Это нормально, и позже вы оцените данный факт.
Для вызова на выполнение процедуры S ayH ello убедитесь в том, что текстовый курсор находится в области вводимого текста. Затем выполните следующие действия.
1.Нажмите клавишу <F5>.
2.Выберите команду Run^Run Sub/UserForm (Выполнить^Выполнить процеду ру/пользовательскую форму).
3.Щелкните на кнопке Run Sub/UserForm, находящейся на панели инструментов
Standard.
Глава 7. Введение в VBA |
175 |
Использование средства записи макросов
Одним из способов создания кода модуля VBA является запись последовательности действий с помощью специальной функции записи макросов Excel.
Как бы вы ни старались, но записать показанную в предыдущем примере процедуру S a y H ello вы не сможете. Запись макросов — полезное средство, но оно имеет свои ог раничения. После записи макросов вы неоднократно будете вносить изменения или вво дить дополнительный код вручную.
В следующем примере показано, как записать макрос, изменяющий ориентацию страницы на альбомную. Если вы хотите получить его самостоятельно, то начните рабо тус пустой рабочей книги и выполните следующие действия.
1.Активизируйте рабочий лист в книге (подойдет любой лист).
2.Выберите команду Разработчик^ Код^ Запись макроса (Developer^Code*^ Record Macro). После этого Excel отобразит диалоговое окно Запись макроса (Record Macro).
3.Щелкните на кнопке ОК, чтобы принять параметры, заданные по умолчанию.
Excel автоматически вставит новый модуль VBA в проект VBA рабочей книги. Начиная с этого момента Excel будет преобразовывать все ваши действия в код VBA. Обратите внимание, что в строке состояния Excel отображается голубой квадратик. После щелчка на нем запись макроса прекращается.
4.Выберите команду Разметка страницы^Параметры страницы^Ориентация1^Альбомная (Page Layout^Page Setup^Orientation^Landscape).
5.Выберите команду Разрабочик^Код1^Остановить запись (Developer^Code1 Stop Recording) или щелкните на голубом квадратике, который находится в стро ке состояния.
Программа Excel прекратит запись ваших действий.
Чтобы просмотреть макрос, запустите VBE (проще всего нажать клавиши <Alt+Fll>) и найдите проект в окне Project Explorer. Щелкните на узле M o d u les, чтобы развернуть его. Затем щелкните на элементе M o d u le l, чтобы отобразить окно кода (если в проекте уже присутствовал модуль M o d u le l, новый макрос будет находиться в модуле Module2). Код, созданный всего лишь одной простой командой Excel, представлен на рис. 7.6. Строки кода с предшествующими им апострофами являются комментариями и не выполняются.
Возможно, вас удивит объем кода, сгенерированного всего лишь одной командой (особенно если вы записываете макрос впервые). Несмотря на то что вы изменили толь ко одну простую настройку на вкладке Параметры страницы (Page Setup), Excel гене рирует код, задающий все параметры в этом диалоговом окне.
Таким образом, зачастую программа, полученная при записи макроса, избыточна. Ес ли вы хотите, чтобы макрос всего лишь изменял ориентацию страницы на альбомную, можете значительно упростить его, удалив ненужный код. Это облегчит восприятие мак роса и ускорит его выполнение, поскольку избавит его от лишних операций. Упростить макрос вы вправе до следующего вида.
Sub M a c r o l ()
W ith A c t i v e S h e e t . P a g e S e t u p
. O r i e n t a t i o n = x l L a n d s c a p e End W it h
End Sub
