Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Настраивает верхний и нижний диапазоны полей даты в представлении Календарь.
Синтаксис
выражение.
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 и обратная связь.