Главная страница Случайная страница
Разделы сайта
АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника
Другие свойства объекта Application
|
|
| Свойства | Описание | Примеры операторов |
| Calculation (R/W) | Возвращает или устанавливает параметры вычислений. Задается константами MS Excel | Application. Calculation =xlCalculateManual задает ручной пересчет |
| Application.CalculateBeforeSave=True задает автоматический пересчет перед сохранением файла | ||
| Path (R/O String) | Возвращает полный путь к объекту | MsgBox " Путь к приложению MS Excel " & Application.Path высвечивает путь к программе MS Excel |
| SheetsInNewWorkbook (R/W Long) | Возвращает или устанавливает количество рабочих листов во вновь создаваемой рабочей книге | MsgBox " В новой рабочей книге " & Application.SheetsInNewWorkbook & " рабочих листов " высветит количество листов во вновь создаваемой рабочей книге |
| ThisWorkbook | Возвращает объект ThisWorkbook - рабочую книгу, в которой находится выполняемая процедура. Свойство ActiveWorkbook в отличие от свойства ThisWorkbookпозволяет получить доступ к активной рабочей книге | ThisWorkbook.Close SaveChanges: =False закрывает рабочую книгу, содержащую исполняемый код |
| ThisWorkbook.FullName возвращает полный путь к рабочей книге, содержащей исполняемый код | ||
| For Each w In Workbooks If w.Name < > ThisWorkbook.Name Then w.Close savechanges: =True End If Next w Цикл закрывает с сохранением изменений все открытые рабочие книги за исключением той, в которой находится исполняемая процедура | ||
| WorksheetFunction | Возвращает одноименный объект-контейнер функций рабочего листа | MsgBox " Десятичный логарифм 10^6 равен " & WorksheetFunction.Log10(10^6)высвечивает 6 |
Важно
· Вызов функции рабочего листа производится со ссылкой на контейнер WorksheetFunction или на объект Application.
· Названия функции VBA и функции рабочего листа, выполняющих одинаковые действия, могут не совпадать, например, функция Instr и функция Find.
Методы
Метод OnTime
Метод позволяет запустить некоторую процедуру в заданный момент времени.
Синтаксис OnTime(EarliestTime, Procedure[, LatestTime])
· EarliestTime - выражение, задающее время запуска процедуры;
· Procedure - имя запускаемой процедуры;
· LatestTime - самое позднее время, когда процедура может быть запущена, если невозможно было запустить ее точно в указанное время. Причиной невозможности запуска могло явиться выполнение диалога, который не был прерван ранее.
Пример
увеличить изображение
Рис. 8.6. Пример применения метода OnTime
Процедура mes_time в 16: 30 высвечивает сообщение " Пошли пить кофе".
|
|