Студопедия

КАТЕГОРИИ:


Архитектура-(3434)Астрономия-(809)Биология-(7483)Биотехнологии-(1457)Военное дело-(14632)Высокие технологии-(1363)География-(913)Геология-(1438)Государство-(451)Демография-(1065)Дом-(47672)Журналистика и СМИ-(912)Изобретательство-(14524)Иностранные языки-(4268)Информатика-(17799)Искусство-(1338)История-(13644)Компьютеры-(11121)Косметика-(55)Кулинария-(373)Культура-(8427)Лингвистика-(374)Литература-(1642)Маркетинг-(23702)Математика-(16968)Машиностроение-(1700)Медицина-(12668)Менеджмент-(24684)Механика-(15423)Науковедение-(506)Образование-(11852)Охрана труда-(3308)Педагогика-(5571)Полиграфия-(1312)Политика-(7869)Право-(5454)Приборостроение-(1369)Программирование-(2801)Производство-(97182)Промышленность-(8706)Психология-(18388)Религия-(3217)Связь-(10668)Сельское хозяйство-(299)Социология-(6455)Спорт-(42831)Строительство-(4793)Торговля-(5050)Транспорт-(2929)Туризм-(1568)Физика-(3942)Философия-(17015)Финансы-(26596)Химия-(22929)Экология-(12095)Экономика-(9961)Электроника-(8441)Электротехника-(4623)Энергетика-(12629)Юриспруденция-(1492)Ядерная техника-(1748)

Листинг 1. Использование объекта Application и его свойств

Свойства объекта Word.Application

Свойства любого объекта делятся на две группы:

· свойства-участники – это объекты, вложенные в данный объект;

· терминальные свойства – это обычные переменные VBA, характеризующие данный объект.

Перечислим основные свойства объекта Application (см. таб. 5.1.3).

Таблица 5.1.3. Основные свойства объекта Word.Application

Свойство Тип Значение
ActiveDocument Object Активный документ
ActivePrinter String Имя активного принтера
ActiveWindow Object Активное окно
Count Long Число объектов коллекции
Name String Имя объекта
Path String Драйвер и путь к папке, в которой сохранен объект
Selection Object Текущий выделенный фрагмент
StatusBar String Сообщение строки состояния
Visible Boolean Отображается объект на экране или нет

Несколько слов об общих объектах. Единую систему организации панелей меню и инструментальных кнопок обеспечивает объект CommandBar, справок – объект Assistant, поиска – объект FileSearch, объект VBE позволяет работать с единым редактором языка программирования. Центральными объектами Word являются коллекции Documents (документы) и Templates (шаблоны), точнее, составляющие их элементы – сами документы и шаблоны. Рассмотрим кратко объекты "второго плана".

Рассмотрим пример, в котором действует корневой объект Application и объекты, встроенные в него, один из них – FileSearch. На самом деле нельзя привести ни одного работающего примера, в котором явно или неявно не присутствовал бы объект Application. Напомним, что при использовании глобальных объектов объект Application разрешается опускать в цепочках вызовов, но обращение к любому объекту явно или неявно начинается с объекта Application.

Содержательно в предлагаемом примере решается следующая задача. По открытому документу определяется каталог. Затем в нем отыскиваются все файлы *.rtf и их имена добавляются в загруженный для записи файл. Процедура, реализующая решение данной задачи, приведена в листинге 1 (см. здесь).

Sub Example1() Dim DocPath As String Dim Answer DocPath = Documents("word.rtf").Path ‘определяем путь загружаемого файла Documents.Open (DocPath & "\55.rtf") ‘загружаем другой для записи With Application.FileSearch.LookIn = DocPath.FileName = "*.rtf" If.Execute(SortBy:=msoSortByFileName, SortOrder:=msoSortOrderAscending) > 0 Then Answer = MsgBox("Найдено " &.FoundFiles.Count & " файла(ов)." & "Добавить их имена в документ?", vbYesNo) If Answer = vbYes Then For i = 1 To.FoundFiles.Count ActiveDocument.Paragraphs.Add ActiveDocument.Range.InsertAfter.FoundFiles(i) Next i End If Else MsgBox "Нет файлов, соответствующих шаблону поиска." End If End WithEnd Sub

В данном примере используются три свойства-участника объекта Application: FileSearch, Documents и ActiveDocument. Все они возвращают объект соответствующего класса. Наряду с ними у объекта Application довольно много терминальных свойств. Они применяются реже, но играют важную роль, позволяя управлять внешним видом приложения и другими его характеристиками:

Application.DisplayStatusBar = False Application.DisplayRecentFiles = False

Изменяя свойства DisplayStatusBar и DisplayRecentFiles, мы выключаем панель статуса и показ в меню File файлов последнего использования.

<== предыдущая лекция | следующая лекция ==>
Объект Word.Application | Листинг 2. Открытие существующего документа
Поделиться с друзьями:


Дата добавления: 2014-01-05; Просмотров: 322; Нарушение авторских прав?; Мы поможем в написании вашей работы!


Нам важно ваше мнение! Был ли полезен опубликованный материал? Да | Нет



studopedia.su - Студопедия (2013 - 2024) год. Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав! Последнее добавление




Генерация страницы за: 0.01 сек.