Application.GanttBarFormat 方法 (Project)
更改甘特条形图的格式的默认样式。
语法
expression。 GanttBarFormat
( _TaskID_
, _GanttStyle_
, _StartShape_
, _StartType_
, _StartColor_
, _MiddleShape_
, _MiddlePattern_
, _MiddleColor_
, _EndShape_
, _EndType_
, _EndColor_
, _LeftText_
, _RightText_
, _TopText_
, _BottomText_
, _InsideText_
, _Reset_
, _ProjectName_
)
expression:表示 Application 对象的变量。
参数
名称 | 必需/可选 | 数据类型 | 说明 |
---|---|---|---|
TaskID | 可选 | Long | 甘特图表上要更改的任务的标识号。 默认设置是更改选定任务的甘特条形图。 |
GanttStyle | 可选 | Integer | 应用于甘特条形图设置格式的样式。 GanttStyle 的值根据位置栏的样式在 条形图样式对话框中。 例如,值 3 返回第三个栏样式在列表中。 |
StartShape | 可选 | Long | 甘特条形图的头部形状。 可以是 PjBarEndShape 常量之一。 |
StartType | 可选 | Long | 甘特条形图头部的类型。 可以是 PjBarType 常量之一。 |
StartColor | 可选 | Long | 甘特条形图头部形状的颜色。 可以是 PjColor 常量之一。 |
MiddleShape | 可选 | Long | 甘特条形图的中部形状。 可以是 PjBarShape 常量之一。 |
MiddlePattern | 可选 | Long | 甘特条形图的中部图案。 可以是 PjFillPattern 常量之一。 |
MiddleColor | 可选 | Long | 中间部分甘特条形图的颜色。 可以是 PjColor 常量之一。 |
EndShape | 可选 | Long | 尾部甘特条形图的形状。 可以是 PjBarEndShape 常量之一。 |
EndType | 可选 | Long | 尾部的甘特条形图类型。 可以是下列的 PjBarType 常量之一: pjDashed 、 pjFramed 或 pjSolid 。 |
EndColor | 可选 | Long | 甘特条形图尾部形状的颜色。 可以是 PjColor 常量之一。 |
LeftText | 可选 | String | 要显示在甘特条形图左侧的任务域。 |
RightText | 可选 | String | 要显示在甘特条形图右侧的任务域。 |
TopText | 可选 | String | 要显示在甘特条形图上方的任务域。 |
BottomText | 可选 | String | 要显示在甘特条形图下方的任务域。 |
InsideText | 可选 | String | 要显示在甘特条形图内部的任务域。 |
Reset | 可选 | Boolean | 如此 如果栏格式重置为默认格式的样式在 条形图样式对话框中;否则为 假 。 |
ProjectName | 可选 | String | 包含 TaskID ,如果合并所涉及的项目名称。 默认值是活动项目的名称。 |
返回值
Boolean
说明
使用 GanttBarFormat 方法,而不指定任何参数将显示 设置条形图格式对话框。
若要定义默认样式,请使用 GanttBarStyleEdit 方法。
若要更改颜色可以是十六进制 RGB 值的甘特条形图格式,请使用 GanttBarFormatEx 方法。
示例
以下示例将任务 ID 为 3 的任务头部显示为红色菱形。
Sub GanttBar_Format()
'Activate Gantt Chart view
ViewApply Name:="&Gantt Chart"
GanttBarFormat TaskID:=3, StartShape:=pjDiamond, StartType:=pjSolid, StartColor:=pjRed
End Sub
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。