Application.CalendarBarStylesEditEx 方法 (Project)

更改“日历”视图中指定类型的条形图的样式,其中 Color 可以是十六进制值。

语法

expressionCalendarBarStylesEditEx( _Item_, _Bar_, _Pattern_, _Color_, _Align_, _Wrap_, _Shadow_, _Field1_, _Field2_, _Field3_, _Field4_, _Field5_, _SplitPattern_ )

表达 返回 Application 对象的表达式。

参数

名称 必需/可选 数据类型 说明
Item 必需 Long 要编辑的日历栏样式类型。 可以是下列的 PjBarItem 常量之一: pjBarNonCriticalpjBarCriticalpjBarSummarypjBarMilestonepjBarMarkedpjBarHighlightedpjBarProjectSummarypjBarExternalTask
Bar 可选 Long 条形图类型。 可以是下列的 PjCalendarBarType 常量之一: pjNormalBarpjLineBarpjNoBar
Pattern 可选 Long 条形图图案。 可以是 PjFillPattern 常量之一。
Color 可选 Long 条形图颜色。 可以是 RGB 颜色的十六进制值,其中红色是最后一个字节。 例如,值 &HFF0000 为蓝色,&H00FFFF 为黄色。
Align 可选 Long 栏中的文本的对齐方式。 可以是下列的 PjAlignment 常量之一: pjLeftpjCenterpjRight
Wrap 可选 Boolean 如此 如果项目,文字环绕在栏;否则为
Shadow 可选 Boolean 栏是否带有阴影。否则为
Field1 可选 String 条形图中显示的第一个域。
Field2 可选 String 条形图中显示的第二个域。
Field3 可选 String 条形图中显示的第三个域。
Field4 可选 String 条形图中显示的第四个域。
Field5 可选 String 条形图中显示的第五个域。
SplitPattern 可选 Long 用来显示拆分任务的线型。 可以是下列的 PjLineType 常量之一: pjNoLinespjDashpjCloseDotpjContinuouspjDot

返回值

Boolean

说明

若要指定 Field1Field5 中任何一个域的值,同时也需要指定在其之前的所有 Field 参数。 例如,若要指定 Field3,同时也需要指定 Field1Field2

注意

Field1Field5 参数不能使用 PjFields 常量。 若要查看可以添加到日历条形图中的域名称,请打开“日历”视图,单击“日历工具”组中的“格式”选项卡。 单击功能区上的“ 条形图样式 ”,然后单击“ 字段 () ”下拉列表。

示例

以下示例将关键任务设置为标准条形图,将颜色设置为带有斜纹的紫色,并将域设置为包括任务名称和已分配的资源名称。 该示例还将摘要任务设置为行条形图,并将颜色设置为绿色。

Sub CalendarBar_StyleEdit()
    'Activate Caldender view 
    ViewApply Name:="Calendar" 
 
    CalendarBarStylesEditEx Item:=pjBarCritical, Bar:=PjCalendarBarType.pjNormalBar, _
          Color:=&HAA00AA, Pattern:=PjFillPattern.pjDiagonalRightPattern, _
          Field1:="Name", Field2:="Resource Names" 
    CalendarBarStylesEditEx Item:=pjBarSummary, Bar:=PjCalendarBarType.pjLineBar, _
    Color:=&H1AA01 
End Sub

注意

如果使用任何 PjColor 枚举常量作为 Color 参数,则颜色将接近黑色。 例如, pjGreen 的值为 9,该值在 CalendarBarStylesEditEx 方法中为深红色。 若要仅使用 PjColor 常量表示的 16 种颜色,请使用 CalendarBarStylesEdit 方法。

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。