Анимация
JavaScript


Главная  Библионтека 

0 [ 1 ] 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57

Workbooks(Workbook)

Wofksheets(Worksheet)

Charts(Chart)

DocumentProperties

VBProject

CustomViews(CustomView)

CommandBars(CommandBar)

PivotCahes(PivotCahe)

Styles(Style)

Borders(Border)

Font

Interior

Windows(Window)

Panes(Pane)

Addlns(Addln)

AutoCorrect

Assistant

Debug

Dialogs(Dialog)

CommandBars

Windows(Window)

Panes (Pane)

WorksheetFuncti on

RecentFiles(RecentFile)

FileSearch

FileFind

ODBCErrors(ODBCError)

Names (Name)

Routings lip

Mailer

Рис. 1.1. Иерархия встроенных объектов VBA

Полная ссылка на объект состоит из ряда имен вложенных последовательно друг в друга объектов. Разделителями имен объектов в этом ряду являются точки, ряд начинается с объекта Application и заканчивается именем самого объекта. Например, полная ссылка на ячейку А1 рабочего листа Лист1 рабочей книги с именем Кафедра имеет вид:

Application.Workbooks("Кафедра").Worksheets ( "Лист1 " ) .Range("Al")

Приводить каждый раз полную ссылку на объект не обязательно. Обычно достаточно ограничиться только неявной ссыл-



кой на объект. В неявной ссылке, в отличие от полной, объекты, которые активны в данный момент, как правило, можно опускать. В рассмотренном случае, если ссылка на ячейку А1 дана в программе, выполняемой в среде Excel, то ссылка на объект Application может быть опущена, т. е. достаточно привести относительную ссылку:

Workbooks("Кафедра").Worksheets("Лист1").Range("А1")

Если рабочая книга Кафедра является активной, то ссылку можно записать еще короче:

Worksheets("Лист1").Range("А1")

Если и рабочий лист Лист1 активен, то в относительной ссылке вполне достаточно ограничиться упоминанием только диапазона А1:

Range("А1")

1.5. Методы

Объект сам по себе не представляет большого значения. Намного значительнее то, какие действия можно совершать над объектом и какими свойствами он обладает. Метод как раз и представляет собой действие, выполняемое над объектом.

Синтаксис применения метода:

Объект.Метод

Например, при помощи метода Quit (Закрыть) закрывается приложение (объект Application):

Application.Quit

Метод можно применять ко всем объектам семейства. Например, к семейству chartobjects (Диаграммы) рабочего листа Лист1 применен метод Delete (Удалить), который приводит к удалению всех диаграмм с рабочего листа Лист1:

Worksheets("Лист1") .ChartObj ects.Delete



8 Программирование в среде Visual Basic for Applications

1.6. Свойства

Свойство представляет собой атрибут объекта, определяющий его характеристики, такие, как размер, цвет, положение на экране и состояние объекта, например доступность или видимость. Чтобы изменить характеристики объекта, надо просто изменить значения его свойств.

Синтаксис установки значения свойства:

Объект.Свойство = ЗначениеСвойства

В следующем примере изменяется заголовок окна Excel посредством задания свойства Caption объекту Application:

Application.Caption = "База данных"

Свойство можно изменять сразу у всех объектов семейства. Например, с помощью установки свойству Visible (Видимость) значения False (Ложь) все рабочие листы активной книги (семейство объектов Worksheets) скрываются:

Worksheets.visible = False

Среди свойств особое место занимают свойства, возвращающие объект. Приведем наиболее часто употребляемые подобные свойства.

Ас t iveWindow

Возвращает активное окно Excel

ActiveWorkbook

Возвращает активную рабочую книгу окна Excel

ActiveSheet

Возвращает активный лист активной рабочей книги

ActiveDialog

Возвращает активное диалоговое окно активного рабочего листа

ActiveChart

Возвращает активную диаграмму активного рабочего листа

ActiveCell

Возвращает активную ячейку активного рабочего листа

Свойство ActiveCell возвращает активную ячейку активного рабочего листа активной рабочей книги. Следующие три примера возвращают одну и ту же активную ячейку. Обратите внимание на первый из них. Его особенностью является то, что свой-



0 [ 1 ] 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57