Application.GanttBarFormatEx 方法 (Project)

在默认样式的基础上更改甘特条形图的格式，其中的颜色可以是十六进制的 RGB 值。

语法

expression。 GanttBarFormatEx( _TaskID_, _GanttStyle_, _StartShape_, _StartType_, _StartColor_, _MiddleShape_, _MiddlePattern_, _MiddleColor_, _EndShape_, _EndType_, _EndColor_, _LeftText_, _RightText_, _TopText_, _BottomText_, _InsideText_, _Reset_, _ProjectName_ )

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

参数

名称	必需/可选	数据类型	说明
TaskID	可选	Long	甘特图表上要更改的任务的标识号。 默认设置是更改选定任务的甘特条形图。
GanttStyle	可选	Integer	应用于甘特条形图设置格式的样式。 GanttStyle 的值根据位置栏的样式在 条形图样式对话框中。 例如，值 3 返回第三个栏样式在列表中。
StartShape	可选	Integer	甘特条形图的头部形状。 可以是 PjBarEndShape 常量之一。
StartType	可选	Integer	甘特条形图头部的类型。 可以是 PjBarType 常量之一。
StartColor	可选	Long	甘特条形图头部形状的颜色。 可以是十六进制的 RGB 值，其中红色是最后一个字节。 例如，&H00FFFF 为黄色。
MiddleShape	可选	Integer	甘特条形图中部形状。 可以是 PjBarShape 常量之一。
MiddlePattern	可选	Integer	中部的甘特条形图图案。 可以是 PjFillPattern 常量之一。
MiddleColor	可选	Long	甘特条形图中部的颜色。 可以是十六进制的 RGB 值，其中红色是最后一个字节。 例如，&HFF00FF 为紫色。
EndShape	可选	Integer	尾部甘特条形图的形状。 可以是 PjBarEndShape 常量之一。
EndType	可选	Integer	尾部的甘特条形图类型。 可以是下列的 PjBarType 常量之一: pjDashed 、 pjFramed 或 pjSolid 。
EndColor	可选	Long	甘特条形图尾部形状的颜色。 可以是十六进制的 RGB 值，其中红色是最后一个字节。 例如，&HFFFF00 为蓝绿色。
LeftText	可选	String	要显示在甘特条形图左侧的任务域。
RightText	可选	String	要显示在甘特条形图右侧的任务域。
TopText	可选	String	要显示在甘特条形图上方的任务域。
BottomText	可选	String	要显示在甘特条形图下方的任务域。
InsideText	可选	String	要显示在甘特条形图内部的任务域。
Reset	可选	Boolean	如此 如果栏格式重置为默认格式的样式在 条形图样式对话框中;否则为 假 。
ProjectName	可选	String	包含 TaskID ，如果合并所涉及的项目名称。 默认值是活动项目的名称。

返回值

Boolean

说明

使用 GanttBarFormatEx 方法，而不指定任何参数将显示 设置条形图格式对话框。

若要定义默认样式（其中的颜色可以是十六进制的 RGB 值），请使用 GanttBarEditEx 方法。

示例

下面的示例将任务 ID 为 3 的任务的头部显示为中等红色的菱形。

Sub GanttBar_Format() 
 
    'Activate Gantt Chart view 
    ViewApply Name:="&Gantt Chart" 
    GanttBarFormatEx TaskID:=3, StartShape:=pjDiamond, StartType:=pjSolid, StartColor:=&H8888FF
End Sub

支持和反馈

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