Метод Application.CalendarDateBoxes (Project)

Статья
04/07/2023

Настраивает верхний и нижний диапазоны полей даты в представлении Календарь.

Синтаксис

выражение. CalendarDateBoxes( _TopLeft_, _TopRight_, _BottomLeft_, _BottomRight_, _TopColor_, _BottomColor_, _TopPattern_, _BottomPattern_ )

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
TopLeft	Необязательный	Long	Формат дат в левом верхнем углу каждого поля даты. Может быть одной из констант PjCalendarDateLabel .
TopRight	Необязательный	Long	Формат дат в правом верхнем углу каждого поля даты. Может быть одной из констант PjCalendarDateLabel .
BottomLeft	Необязательный	Long	Формат дат в левом нижнем углу каждого поля даты. Может быть одной из констант PjCalendarDateLabel .
BottomRight	Необязательный	Long	Формат дат в правом нижнем углу каждого поля даты. Может быть одной из констант PjCalendarDateLabel .
TopColor	Необязательный	Long	Цвет верхней полосы в каждом поле даты. Может быть одной из констант PjColor .
BottomColor	Необязательный	Long	Цвет нижней полосы в каждом поле даты. Может быть одной из констант PjColor .
TopPattern	Необязательный	Long	Узор верхней полосы в каждом поле даты. Может быть одной из констант PjFillPattern .
BottomPattern	Необязательный	Long	Шаблон нижней полосы в каждом поле даты. Может быть одной из констант PjFillPattern .

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

Boolean

Примечания

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

Чтобы изменить поля дат календаря, где цвета могут быть rgb-значениями, используйте метод CalendarDateBoxesEx .

Пример

В следующем примере в левом верхнем углу отображается день недели (например, четверг), месяц и дата (например, 31 января) в правом верхнем углу, день года и года (например, 70 2012) в левом нижнем углу каждого поля даты в календаре, а также задаются цвета фона верхней и нижней полосы.

Sub FormatCalendarDays() 
    CalendarDateBoxes Topleft:=pjDay_dddd, TopRight:=pjDay_mmm_dd, _
        BottomLeft:=pjCalendarLabelDayOfYear_dd_yyyy, _ 
        TopColor:=PjColor.pjSilver, BottomColor:=PjColor.pjYellow 
End Sub

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

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