Поделиться через


Метод Application.OptionsCalendar (Project)

Задает параметры календаря активного проекта.

Синтаксис

выражение. OptionsCalendar( _StartWeekOnMonday_, _StartYearIn_, _StartTime_, _FinishTime_, _HoursPerDay_, _HoursPerWeek_, _SetDefaults_, _StartWeekOn_, _UseFYStartYear_, _DaysPerMonth_ )

выражение: переменная, представляющая объект Application.

Параметры

Имя Обязательный или необязательный Тип данных Описание
StartWeekOnMonday Необязательный Логический Значение true , если календарная неделя начинается с понедельника. False , если календарная неделя начинается с воскресенья. Если параметр StartWeekOn указан, параметр StartWeekOnMonday игнорируется. (Аргумент StartWeekOn — это лучший способ указать начало недели.)
StartYearIn Необязательный Long Первый месяц финансового года. Может быть одной из констант PjMonth .
StartTime Необязательный Variant Время начала по умолчанию для рабочих дней.
FinishTime Необязательный Variant Время окончания по умолчанию для рабочих дней.
HoursPerDay Необязательный Double Количество рабочих часов по умолчанию в день.
HoursPerWeek Необязательный Double Количество рабочих часов по умолчанию в неделю.
SetDefaults Необязательный Логический Значение true , если значения StartYearIn, StartTime, FinishTime, HoursPerDay, HoursPerWeek, StartWeekOn и UseFYStartYear используются в качестве значений по умолчанию для новых проектов. Значение по умолчанию — False.
StartWeekOn Необязательный Long Первый день недели. Может быть одной из констант PjWeekday .
UseFYStartYear Необязательный Логический Значение true , если финансовый год определяется годом первого месяца этого финансового года. Значение false , если определяется последним месяцем финансового года. Например, если StartYearIn имеет значение pjJuly (обозначает июль 2012 г.), а UseFYStartYear имеет значение True, финансовый год, заканчивающийся в июне 2012 г., будет иметь значение FY2012.
DaysPerMonth Необязательный Double Количество рабочих дней в месяц по умолчанию.

Возвращаемое значение

Boolean

Примечания

Если аргумент опущен, значение по умолчанию указывается параметром на вкладке Расписание диалогового окна Параметры проекта .

При использовании метода OptionsCalendar без указания аргументов отображается диалоговое окно Параметры проекта с выбранной вкладкой Общие .

Пример

В следующем примере для первого месяца финансового года устанавливается апрель, по умолчанию — 4 часа, а по умолчанию — 20 часов.

Sub Options_Calendar() 
    Dim HoursDay As Double 
    Dim HoursWeek As Double 
 
    HoursDay = 4 
    HoursWeek = 20 
 
    OptionsCalendar StartYearIn:=pjApril, HoursPerDay:=HoursDay, HoursPerWeek:=HoursWeek 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.