Application.CalendarDateShadingEdit method (Project)
Changes the background color and pattern of date boxes in the Calendar view.
Syntax
expression. CalendarDateShadingEdit( _Item_, _Pattern_, _Color_ )
expression A variable that represents an Application object.
Parameters
| Name | Required/Optional | Data type | Description |
|---|---|---|---|
| Item | Required | Long | The type of calendar day to change. Can be one of the PjCalendarShading constants. |
| Pattern | Optional | Long | The pattern for the type of date box specified by Item. Can be one of the PjFillPattern constants. |
| Color | Optional | Long | The color for the type of date box specified by Item. Can be one of the PjColor constants. |
Return value
Boolean
Remarks
Besides Item, CalendarDateShadingEdit requires either the Pattern or Color parameter, or both, to run without an error. For example, the following line in the Immediate pane of the VBE works correctly.
? CalendarDateShadingEdit (PjCalendarShading.pjBaseWorking, , &H01dddd)
To edit calendar date boxes where the colors can be RGB values, use the CalendarDateShadingEditEx method.
Example
The following example changes the background color of working days in the base calendar to a stippled purple and the color of nonworking days to gray.
Sub CalendarDate_ShadingEdit()
' Activate the Caldender view.
ViewApply Name:="Calendar"
CalendarDateShadingEdit Item:=pjBaseWorking, Pattern:=pjLightFillPattern, Color:=pjPurple
CalendarDateShadingEdit Item:=pjBaseNonworking, Color:=pjGray
End Sub
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.