Упражнение

Используя окно просмотра объектов Object Browser или справочную систему Visual Basic, найдите следующие свойства.

Для объекта Application:

• каталог, где инсталлирована программа Excel;
• используемую операционную систему;
• зарегистрированное имя пользователя программы Excel.

Для объекта Workbook:

• где сохранена рабочая книга.

Используйте эту информацию для создания процедуры. В текущую рабочую книгу вставьте новый модуль. Создайте новую процедуру с именем СкажиМне. Эта процедура должна использовать найденные вами свойства для вывода последовательности окон сообщений со значениями этих свойств.

Полный код процедуры:

Sub СкажиМне()

MsgBox "Excel инсталлирована в каталоге " & Application.Path

MsgBox "Excel работает под управлением операционной системы " _

& Application.OperatingSystem

MsgBox Application.UserName & " - зарегистрированный пользователь."

MsgBox "Эта рабочая книга имеет " & Worksheets.Count & " листа(ов)."

MsgBox "Рабочая книга сохранена? " & ThisWorkbook.Saved

End Sub

Ответы к 9-му часу

Тесты

1. Как в VBA применить функцию МАХ для нахождения максимального значения из диапазона ячеек А1:С5?

Используйте оператор

sngResult = Application.Max(Range("A1:C5"))

1. Какой объект находится на высшем уровне иерархии объектов?

Объект Application.

1. Какой метод применяется для создания новых рабочих книг и рабочих листов?

Метод Add.

1. Как в VBA удалить рабочий лист из рабочей книги?

Надо применить метод Delete объекта Worksheet.

1. Истинно или ложно следующее утверждение: из процедуры VBA нельзя вызывать на исполнение макросы, записанные в стиле Excel 4.0?

Ложно. Макросы, записанные в стиле Excel 4.0, можно выполнить с помощью метода Run объекта Application.