Метод Application.CalendarDateBoxesEx (Project)
Настраивает верхний и нижний диапазоны полей даты в представлении Календарь.
Синтаксис
выражение. CalendarDateBoxesEx
( _TopLeft_
, _TopRight_
, _BottomLeft_
, _BottomRight_
, _TopColor_
, _BottomColor_
, _TopPattern_
, _BottomPattern_
)
Выражение Выражение, возвращающее объект Application .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
TopLeft | Необязательный | Long | Формат дат в левом верхнем углу каждого поля даты. Может быть одной из констант PjCalendarDateLabel . |
TopRight | Необязательный | Long | Формат дат в правом верхнем углу каждого поля даты. Может быть одной из констант PjCalendarDateLabel . |
BottomLeft | Необязательный | Long | Формат дат в левом нижнем углу каждого поля даты. Может быть одной из констант PjCalendarDateLabel . |
BottomRight | Необязательный | Long | Формат дат в правом нижнем углу каждого поля даты. Может быть одной из констант PjCalendarDateLabel . |
TopColor | Необязательный | Long | Цвет верхней полосы в каждом поле даты. Может быть шестнадцатеричным значением для цвета RGB, где красный — последний байт. Например, значение &HFF0000 — синим, а &H00FFFF — желтым. |
BottomColor | Необязательный | Long | Цвет нижней полосы в каждом поле даты. Может быть шестнадцатеричным значением для цвета RGB. |
TopPattern | Необязательный | Long | Узор верхней полосы в каждом поле даты. Может быть одной из констант PjFillPattern . |
BottomPattern | Необязательный | Long | Шаблон нижней полосы в каждом поле даты. Может быть одной из констант PjFillPattern . |
Возвращаемое значение
Boolean
Примечания
При использовании метода CalendarDateBoxesEx без указания аргументов отображается диалоговое окно Шкала времени с выбранной вкладкой "Поля даты ".
Пример
В следующем примере в левом верхнем углу отображается день недели (например, четверг), месяц и дата (например, 31 января) в правом верхнем углу, день года и года (например, 70 2010) в левом нижнем углу каждого поля даты в календаре, а цвет фона верхней полосы — серебристый, а цвет фона нижней полосы — светло-желтый.
Sub FormatCalendarDays()
CalendarDateBoxesEx Topleft:=pjOverflowIndicator, TopRight:=pjDay_mmm_dd, _
BottomLeft:=pjCalendarLabelDayOfYear_dd_yyyy, _
TopColor:=&HE0E8E8, BottomColor:=&H1E8E8
End Sub
Примечание.
Если вы используете любую из констант перечисления PjColor для параметров TopColor или BottomColor , цвет будет почти черным. Например, значение pjGreen равно 9, что в методе CalendarDateBoxesEx является очень темно-красным. Чтобы использовать только шестнадцать цветов, доступных с константами PjColor , используйте метод CalendarDateBoxes .
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.