通过

Application.CalendarDateShadingEdit Method

  • 项目
Project Developer Reference

Changes box shading in the Calendar.

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 exception to change. Can be one of the following PjCalendarShading constants:
Pattern Optional Long The pattern for the type of date box specified by Item. Can be one of the following PjFillPattern constants:
Color Optional Long The color for the type of date box specified by Item. Can be one of the following PjColor constants:

Return Value
Boolean

Example
The following example changes the background color of working days in the base calander to purple and then to white.

Visual Basic for Applications 
  Sub CalendarDate_ShadingEdit()
'Calender must be active for this to work
    ViewApply Name:="Calendar"
    CalendarDateShadingEdit Item:=pjBaseWorking, Pattern:=pjSolidFillPattern, Color:=pjPurple
    CalendarDateShadingEdit Item:=pjBaseWorking, Color:=pjWhite
End Sub

See Also